add change and remove some settings applications
authorpenk
Thu, 19 Dec 2002 17:33:28 +0100
changeset 4399 58a4e6feb2bd
parent 4398 4f1963d9b80e
child 4400 5b1bf011547f
add change and remove some settings applications
AbstractLauncherApplication.st
--- a/AbstractLauncherApplication.st	Thu Dec 19 17:32:42 2002 +0100
+++ b/AbstractLauncherApplication.st	Thu Dec 19 17:33:28 2002 +0100
@@ -1182,7 +1182,7 @@
 fontSettings
     "open a dialog on font related settings"
 
-    self settingsDialog:[:handler | self halt. handler fontSettingsFor:self]
+    self settingsDialog:[:handler | handler fontSettingsFor:self]
 
     "Modified: / 31.7.1998 / 22:45:44 / cg"
 !
@@ -5776,7 +5776,6 @@
                     models do:[:m | m value:f].
                     labels do:[:l | l font:f]
                 ] ifFalse:[
-                    self halt.
                     model value:f.
                     lbl font:f.
                 ].
@@ -6665,5 +6664,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.245 2002-12-19 16:32:42 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.246 2002-12-19 16:33:28 penk Exp $'
 ! !