checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 12 Jul 1999 13:02:21 +0200
changeset 2252 9709a3b2b411
parent 2251 93ca87a4e576
child 2253 40b7987f144c
checkin from browser
FBrowser.st
FileBrowser.st
--- a/FBrowser.st	Mon Jul 12 09:45:32 1999 +0200
+++ b/FBrowser.st	Mon Jul 12 13:02:21 1999 +0200
@@ -3275,7 +3275,11 @@
 ].
 
     scrollView := ScrollableView in:topFrame.
-    scrollView origin:(0.0 @ 0.0) corner:(1.0 @ 1.0).
+    scrollView 
+        horizontalScrollable:true;
+        horizontalMini:true;
+        autoHideHorizontalScrollBar:true;
+        origin:(0.0 @ 0.0) corner:(1.0 @ 1.0).
 
     fileListView := SelectionInListView new.
     scrollView scrolledView:fileListView.
@@ -3338,7 +3342,7 @@
 
     "Modified: / 6.9.1995 / 20:26:06 / claus"
     "Modified: / 16.9.1997 / 14:52:46 / stefan"
-    "Modified: / 6.5.1999 / 11:38:08 / cg"
+    "Modified: / 12.7.1999 / 12:59:47 / cg"
 !
 
 initializeCommandViewIn:frame
@@ -6721,5 +6725,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.333 1999-06-29 23:28:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.334 1999-07-12 11:02:21 cg Exp $'
 ! !
--- a/FileBrowser.st	Mon Jul 12 09:45:32 1999 +0200
+++ b/FileBrowser.st	Mon Jul 12 13:02:21 1999 +0200
@@ -3275,7 +3275,11 @@
 ].
 
     scrollView := ScrollableView in:topFrame.
-    scrollView origin:(0.0 @ 0.0) corner:(1.0 @ 1.0).
+    scrollView 
+        horizontalScrollable:true;
+        horizontalMini:true;
+        autoHideHorizontalScrollBar:true;
+        origin:(0.0 @ 0.0) corner:(1.0 @ 1.0).
 
     fileListView := SelectionInListView new.
     scrollView scrolledView:fileListView.
@@ -3338,7 +3342,7 @@
 
     "Modified: / 6.9.1995 / 20:26:06 / claus"
     "Modified: / 16.9.1997 / 14:52:46 / stefan"
-    "Modified: / 6.5.1999 / 11:38:08 / cg"
+    "Modified: / 12.7.1999 / 12:59:47 / cg"
 !
 
 initializeCommandViewIn:frame
@@ -6721,5 +6725,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.333 1999-06-29 23:28:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.334 1999-07-12 11:02:21 cg Exp $'
 ! !