--- a/AbstractSettingsApplication.st Tue Apr 12 19:20:26 2005 +0200
+++ b/AbstractSettingsApplication.st Thu Apr 14 11:13:31 2005 +0200
@@ -5153,7 +5153,7 @@
SmalltalkShareServer killAll
].
] ifFalse:[
- SmalltalkShareServer serverRunning not ifTrue:[
+ SmalltalkShareServer serverRunning ifFalse:[
SmalltalkShareServer start.
"/ must wait a bit; give it a chance to
"/ really start (before checking)
@@ -5175,7 +5175,7 @@
WindowMigrationServer stop
].
] ifFalse:[
- WindowMigrationServer serverRunning not ifTrue:[
+ WindowMigrationServer serverRunning ifFalse:[
WindowMigrationServer start.
"/ must wait a bit; give it a chance to
"/ really start (before checking)
@@ -11256,5 +11256,5 @@
!AbstractSettingsApplication class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.192 2005-02-23 15:32:14 cg Exp $'
-! !
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.193 2005-04-14 09:13:18 cg Exp $'
+! !