ApplicationModel.st
changeset 1523 0570acbd78e3
parent 1519 bc832a0d71ed
child 1526 02941e80a146
equal deleted inserted replaced
1522:53e66e6de160 1523:0570acbd78e3
  2262     |sav|
  2262     |sav|
  2263 
  2263 
  2264     "/ In multiView apps, tell my master.
  2264     "/ In multiView apps, tell my master.
  2265     "/ (but not if I am a modal reincarnation)
  2265     "/ (but not if I am a modal reincarnation)
  2266     (masterApplication notNil 
  2266     (masterApplication notNil 
  2267     and:[self window isModal not]) ifTrue:[
  2267     and:[self window topView isModal not]) ifTrue:[
  2268 
  2268 
  2269         "/ temporary clear my masterApplication to prevent
  2269         "/ temporary clear my masterApplication to prevent
  2270         "/ endless recursion, in case the master sends me
  2270         "/ endless recursion, in case the master sends me
  2271         "/ a closeRequest (although, it is supposed to
  2271         "/ a closeRequest (although, it is supposed to
  2272         "/ send me a closeDownViews ...)
  2272         "/ send me a closeDownViews ...)
  2506 ! !
  2506 ! !
  2507 
  2507 
  2508 !ApplicationModel class methodsFor:'documentation'!
  2508 !ApplicationModel class methodsFor:'documentation'!
  2509 
  2509 
  2510 version
  2510 version
  2511     ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.158 2001-10-11 16:29:52 cg Exp $'
  2511     ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.159 2001-10-17 10:27:53 cg Exp $'
  2512 ! !
  2512 ! !
  2513 ApplicationModel initialize!
  2513 ApplicationModel initialize!