comment/format in: #browseForFileOrDirectory
authorClaus Gittinger <cg@exept.de>
Tue, 26 Oct 2010 12:47:16 +0200
changeset 3954 e28b5c4fe0c9
parent 3953 370687d1030b
child 3955 94fb4a47d108
comment/format in: #browseForFileOrDirectory
FilenameWidgetWithHistory.st
--- a/FilenameWidgetWithHistory.st	Mon Oct 25 11:55:08 2010 +0200
+++ b/FilenameWidgetWithHistory.st	Tue Oct 26 12:47:16 2010 +0200
@@ -287,9 +287,9 @@
             defaultDir := initialDirectoryHolder value.
         ].
         path := Dialog 
-                requestFileName:title
-                default:defaultPath
-                fromDirectory:defaultDir.
+                    requestFileName:title
+                    default:defaultPath
+                    fromDirectory:defaultDir.
     ].
     path isEmptyOrNil ifTrue:[ ^ self ].
     path := path asFilename.
@@ -303,15 +303,15 @@
     ].
     fileNameEntryField contents:path.
 
-    "Modified: / 20-10-2010 / 17:57:36 / cg"
+    "Modified: / 26-10-2010 / 12:46:40 / cg"
 ! !
 
 !FilenameWidgetWithHistory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.16 2010-10-25 09:55:08 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.17 2010-10-26 10:47:16 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.16 2010-10-25 09:55:08 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.17 2010-10-26 10:47:16 cg Exp $'
 ! !