changed:
authorClaus Gittinger <cg@exept.de>
Mon, 29 Oct 2012 12:41:53 +0100
changeset 11948 579c05620cfc
parent 11947 1616d51b78fe
child 11949 214f11c9d368
changed: #hideReadonly #overwritePrompt #pathMustExist #shareAware | replaced by bitOr:
Win32FileDialog.st
--- a/Win32FileDialog.st	Mon Oct 29 01:35:21 2012 +0100
+++ b/Win32FileDialog.st	Mon Oct 29 12:41:53 2012 +0100
@@ -479,7 +479,7 @@
     "Hides the file dialog's Readonly check box. "
     
     self 
-        style:self style | (self class commonDialogConstantAt:'OfnHidereadonly')
+        style:(self style bitOr: (self class commonDialogConstantAt:'OfnHidereadonly'))
 
     "Modified: / 26-10-2010 / 18:46:48 / cg"
 !
@@ -504,8 +504,8 @@
 overwritePrompt
     "Prompt if the user attempts to overwrite a file"
     
-    self style:self style 
-                | (self class commonDialogConstantAt:'OfnOverwriteprompt')
+    self style:(self style 
+                bitOr: (self class commonDialogConstantAt:'OfnOverwriteprompt'))
 
     "Modified: / 26-10-2010 / 18:47:19 / cg"
 !
@@ -537,7 +537,7 @@
 !
 
 pathMustExist
-    self style:self style | 16r800.
+    self style:(self style bitOr: 16r800).
 
     "Modified: / 26-10-2010 / 18:47:27 / cg"
 !
@@ -547,7 +547,7 @@
      (e.g. change.log)"
     
     self 
-        style:self style | (self class commonDialogConstantAt:'OfnShareaware')
+        style:(self style bitOr: (self class commonDialogConstantAt:'OfnShareaware'))
 
     "Modified: / 26-10-2010 / 18:47:36 / cg"
 !
@@ -1204,11 +1204,11 @@
 !Win32FileDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Win32FileDialog.st,v 1.12 2011-01-23 10:05:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Win32FileDialog.st,v 1.13 2012-10-29 11:41:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Win32FileDialog.st,v 1.12 2011-01-23 10:05:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Win32FileDialog.st,v 1.13 2012-10-29 11:41:53 cg Exp $'
 ! !
 
 Win32FileDialog initialize!