--- a/SoundStream.st	Thu Sep 27 18:13:54 2012 +0200
+++ b/SoundStream.st	Wed Oct 03 16:50:45 2012 +0200
@@ -729,8 +729,8 @@
 !SoundStream class methodsFor:'default values'!
 
 defaultAudioFormat
-    OperatingSystem getOSType = 'win32' ifTrue:[
-	^ #S16
+    OperatingSystem isMSWINDOWSlike ifTrue:[
+        ^ #S16
     ].
     ^ #U8
 !
@@ -738,8 +738,8 @@
 defaultBitsPerSample
     "minimum, supported by all audio systems"
 
-    OperatingSystem getOSType = 'win32' ifTrue:[
-	^ 16
+    OperatingSystem isMSWINDOWSlike ifTrue:[
+        ^ 16
     ].
     ^ 8
 !
@@ -1072,13 +1072,13 @@
     sampleRate := self class defaultSampleRate.
     pathName := nil.
 
-    OperatingSystem getOSType ~= 'win32' ifTrue:[
-	'/dev/audio' asFilename exists ifTrue:[
-	    "/
-	    "/ sunos or linux
-	    "/
-	    pathName := '/dev/audio'.
-	].
+    OperatingSystem isUNIXlike ifTrue:[
+        '/dev/audio' asFilename exists ifTrue:[
+            "/
+            "/ sunos or linux
+            "/
+            pathName := '/dev/audio'.
+        ].
     ].
 
     "Created: 17.11.1995 / 17:28:14 / cg"
@@ -2698,11 +2698,11 @@
 !SoundStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.73 2012-09-03 20:23:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.74 2012-10-03 14:50:45 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.73 2012-09-03 20:23:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SoundStream.st,v 1.74 2012-10-03 14:50:45 stefan Exp $'
 ! !
 
 SoundStream initialize!