AbstractLauncherApplication.st
changeset 4566 af369740e2bc
parent 4552 a8df4916183a
child 4604 86265a701791
equal deleted inserted replaced
4565:7162b6a896e6 4566:af369740e2bc
  4119         useManager := false.
  4119         useManager := false.
  4120         localSourceFirst := false.
  4120         localSourceFirst := false.
  4121         cvsIsSetup := false.
  4121         cvsIsSetup := false.
  4122     ].
  4122     ].
  4123     cvsIsSetup := cvsIsSetup asValue.
  4123     cvsIsSetup := cvsIsSetup asValue.
  4124     showErrorNotifier := (Exception emergencyHandler == AbstractLauncherApplication notifyingEmergencyHandler) asValue.
  4124     showErrorNotifier := (NoHandlerError emergencyHandler == AbstractLauncherApplication notifyingEmergencyHandler) asValue.
  4125     showVerboseStack := (DebugView defaultVerboseBacktrace ? false) asValue.
  4125     showVerboseStack := (DebugView defaultVerboseBacktrace ? false) asValue.
  4126     syntaxColoring := currentUserPrefs syntaxColoring asValue.
  4126     syntaxColoring := currentUserPrefs syntaxColoring asValue.
  4127     fullSelectorCheck := currentUserPrefs fullSelectorCheck asValue.
  4127     fullSelectorCheck := currentUserPrefs fullSelectorCheck asValue.
  4128     autoFormat := currentUserPrefs autoFormatting asValue.
  4128     autoFormat := currentUserPrefs autoFormatting asValue.
  4129 
  4129 
  4323         ] ifFalse:[
  4323         ] ifFalse:[
  4324             Smalltalk at:#SourceCodeManager put:nil
  4324             Smalltalk at:#SourceCodeManager put:nil
  4325         ].
  4325         ].
  4326 
  4326 
  4327         showErrorNotifier value ifFalse:[
  4327         showErrorNotifier value ifFalse:[
  4328             Exception emergencyHandler:nil
  4328             NoHandlerError emergencyHandler:nil
  4329         ] ifTrue:[
  4329         ] ifTrue:[
  4330             Exception emergencyHandler:(AbstractLauncherApplication notifyingEmergencyHandler)
  4330             NoHandlerError emergencyHandler:(AbstractLauncherApplication notifyingEmergencyHandler)
  4331         ].
  4331         ].
  4332         DebugView defaultVerboseBacktrace:(showVerboseStack value).
  4332         DebugView defaultVerboseBacktrace:(showVerboseStack value).
  4333         currentUserPrefs syntaxColoring:syntaxColoring value.
  4333         currentUserPrefs syntaxColoring:syntaxColoring value.
  4334         currentUserPrefs at:#fullSelectorCheck put:fullSelectorCheck value.
  4334         currentUserPrefs at:#fullSelectorCheck put:fullSelectorCheck value.
  4335         currentUserPrefs autoFormatting:autoFormat value.
  4335         currentUserPrefs autoFormatting:autoFormat value.
  6418 ! !
  6418 ! !
  6419 
  6419 
  6420 !AbstractLauncherApplication class methodsFor:'documentation'!
  6420 !AbstractLauncherApplication class methodsFor:'documentation'!
  6421 
  6421 
  6422 version
  6422 version
  6423     ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.260 2003-02-13 11:20:36 cg Exp $'
  6423     ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.261 2003-02-18 13:40:09 stefan Exp $'
  6424 ! !
  6424 ! !