changed: #releaseApplicationMutex set MutexHandle to nil
authorca
Wed, 07 Jul 2010 12:01:01 +0200
changeset 12933 4e196c41604d
parent 12932 f9f432d64dd9
child 12934 bc516945ce4d
changed: #releaseApplicationMutex set MutexHandle to nil
StandaloneStartup.st
--- a/StandaloneStartup.st	Sat Jul 03 02:00:40 2010 +0200
+++ b/StandaloneStartup.st	Wed Jul 07 12:01:01 2010 +0200
@@ -320,11 +320,11 @@
 
 releaseApplicationMutex
 
-    OperatingSystem isMSDOSlike ifTrue:[
-        MutexHandle notNil ifTrue:[
-            OperatingSystem releaseMutex: MutexHandle.
-            OperatingSystem primCloseHandle: MutexHandle.
-        ].
+    (MutexHandle notNil and:[OperatingSystem isMSDOSlike]) ifTrue:[
+        OperatingSystem releaseMutex: MutexHandle.
+        OperatingSystem primCloseHandle: MutexHandle.
+
+        MutexHandle := nil.
     ].
 !
 
@@ -690,11 +690,11 @@
 !StandaloneStartup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.41 2009-12-18 10:15:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.42 2010-07-07 10:01:01 ca Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.41 2009-12-18 10:15:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.42 2010-07-07 10:01:01 ca Exp $'
 ! !
 
 StandaloneStartup initialize!