--- a/RegressionTests__Win32OperatingSystemTest.st Wed Jun 29 13:00:17 2016 +0000
+++ b/RegressionTests__Win32OperatingSystemTest.st Wed Jun 29 15:55:29 2016 +0200
@@ -1,4 +1,4 @@
-"{ Package: 'exept:regression' }"
+"{ Package: 'stx:goodies/regression' }"
"{ NameSpace: RegressionTests }"
@@ -29,8 +29,8 @@
self assert: lastErrorCode == 0.
alreadyExists := (lastErrorCode == 5 "ERROR_ACCESS_DENIED" or:[ lastErrorCode == 183 "ERROR_ALREADY_EXISTS"]).
alreadyExists ifTrue:[
- Transcript showCR: 'Mutex already exists!!'.
- ^ self.
+ Transcript showCR: 'Mutex already exists!!'.
+ ^ self.
].
Transcript showCR: 'Mutex created!!'.
Win32OperatingSystem waitForSingleObject: handle.
@@ -53,9 +53,9 @@
self assert:(k notNil).
hasContentType := false.
- k subKeyNamesAndClassesDo:[:nm :clsNm |
- "/ Transcript showCR:nm.
- nm = 'Content Type' ifTrue:[hasContentType := true].
+ k subKeyNamesAndClassesDo:[:nm :clsNm |
+ "/ Transcript showCR:nm.
+ nm = 'Content Type' ifTrue:[hasContentType := true].
].
self assert:hasContentType.