checkin from browser
authorClaus Gittinger <cg@exept.de>
Thu, 23 Nov 1995 03:25:38 +0100
changeset 96 457286c379f9
parent 95 041618c4207f
child 97 306cb0aa67be
checkin from browser
FNmEntrBox.st
FilenameEnterBox.st
--- a/FNmEntrBox.st	Thu Nov 23 01:53:37 1995 +0100
+++ b/FNmEntrBox.st	Thu Nov 23 03:25:38 1995 +0100
@@ -33,15 +33,37 @@
 "
 !
 
-version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/FNmEntrBox.st,v 1.7 1995-11-11 16:28:56 cg Exp $'
-!
-
 documentation
 "
     like a normal enterBox, but does filename-completion when TAB is
     pressed.
 "
+!
+
+version
+    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/FNmEntrBox.st,v 1.8 1995-11-23 02:25:38 cg Exp $'
+! !
+
+!FilenameEnterBox methodsFor:'accessing'!
+
+directoriesOnly
+    "set to expand names for directories only"
+
+    enterField directoriesOnly
+!
+
+directory:aFilename
+    "set the directory"
+
+    enterField directory:aFilename
+
+    "Modified: 7.9.1995 / 10:33:00 / claus"
+!
+
+filesOnly
+    "set to expand names for files only"
+
+    enterField filesOnly
 ! !
 
 !FilenameEnterBox methodsFor:'initialization'!
@@ -56,24 +78,3 @@
     ^ super createEnterField
 ! !
 
-!FilenameEnterBox methodsFor:'accessing'!
-
-directory:aFilename
-    "set the directory"
-
-    enterField directory:aFilename
-
-    "Modified: 7.9.1995 / 10:33:00 / claus"
-!
-
-directoriesOnly
-    "set to expand names for directories only"
-
-    enterField directoriesOnly
-!
-
-filesOnly
-    "set to expand names for files only"
-
-    enterField filesOnly
-! !
--- a/FilenameEnterBox.st	Thu Nov 23 01:53:37 1995 +0100
+++ b/FilenameEnterBox.st	Thu Nov 23 03:25:38 1995 +0100
@@ -33,15 +33,37 @@
 "
 !
 
-version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameEnterBox.st,v 1.7 1995-11-11 16:28:56 cg Exp $'
-!
-
 documentation
 "
     like a normal enterBox, but does filename-completion when TAB is
     pressed.
 "
+!
+
+version
+    ^ '$Header: /cvs/stx/stx/libwidg2/FilenameEnterBox.st,v 1.8 1995-11-23 02:25:38 cg Exp $'
+! !
+
+!FilenameEnterBox methodsFor:'accessing'!
+
+directoriesOnly
+    "set to expand names for directories only"
+
+    enterField directoriesOnly
+!
+
+directory:aFilename
+    "set the directory"
+
+    enterField directory:aFilename
+
+    "Modified: 7.9.1995 / 10:33:00 / claus"
+!
+
+filesOnly
+    "set to expand names for files only"
+
+    enterField filesOnly
 ! !
 
 !FilenameEnterBox methodsFor:'initialization'!
@@ -56,24 +78,3 @@
     ^ super createEnterField
 ! !
 
-!FilenameEnterBox methodsFor:'accessing'!
-
-directory:aFilename
-    "set the directory"
-
-    enterField directory:aFilename
-
-    "Modified: 7.9.1995 / 10:33:00 / claus"
-!
-
-directoriesOnly
-    "set to expand names for directories only"
-
-    enterField directoriesOnly
-!
-
-filesOnly
-    "set to expand names for files only"
-
-    enterField filesOnly
-! !