Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
layout
authorClaus Gittinger <cg@exept.de>
Fri, 07 Mar 1997 16:53:06 +0100
changeset 1071 c8c07a3c4cc7
parent 1070 cdf5cf202f3b
child 1072 50366cfc181a
layout
FBrowser.st file | annotate | diff | comparison | revisions
FileBrowser.st file | annotate | diff | comparison | revisions 
--- a/FBrowser.st	Fri Mar 07 16:36:14 1997 +0100
+++ b/FBrowser.st	Fri Mar 07 16:53:06 1997 +0100
@@ -982,9 +982,10 @@
 
     filterModel := '*' asValue.
     filterField := EditField in:labelFrame.
-    filterField origin:[((width // 4 * 3) + halfSpacing) @ halfSpacing]
-                corner:(1.0 @ filterField heightIncludingBorder).
-    filterField rightInset:ViewSpacing-halfSpacing.
+    filterField 
+        origin:[((width // 4 * 3) + halfSpacing) @ halfSpacing]
+        corner:(1.0 @ (filterField heightIncludingBorder + halfSpacing + halfSpacing) ).
+    filterField rightInset:halfSpacing.
     filterField model:filterModel.
 
     self initializeFilterPattern.
@@ -1047,8 +1048,8 @@
     ObjectMemory addDependent:self.
 
     "Modified: 6.9.1995 / 20:26:06 / claus"
-    "Modified: 30.10.1996 / 11:26:32 / cg"
     "Modified: 28.1.1997 / 14:59:14 / stefan"
+    "Modified: 7.3.1997 / 16:52:21 / cg"
 !
 
 initializeCommandViewIn:frame
@@ -2914,5 +2915,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.119 1997-02-25 19:17:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.120 1997-03-07 15:53:06 cg Exp $'
 ! !
--- a/FileBrowser.st	Fri Mar 07 16:36:14 1997 +0100
+++ b/FileBrowser.st	Fri Mar 07 16:53:06 1997 +0100
@@ -982,9 +982,10 @@
 
     filterModel := '*' asValue.
     filterField := EditField in:labelFrame.
-    filterField origin:[((width // 4 * 3) + halfSpacing) @ halfSpacing]
-                corner:(1.0 @ filterField heightIncludingBorder).
-    filterField rightInset:ViewSpacing-halfSpacing.
+    filterField 
+        origin:[((width // 4 * 3) + halfSpacing) @ halfSpacing]
+        corner:(1.0 @ (filterField heightIncludingBorder + halfSpacing + halfSpacing) ).
+    filterField rightInset:halfSpacing.
     filterField model:filterModel.
 
     self initializeFilterPattern.
@@ -1047,8 +1048,8 @@
     ObjectMemory addDependent:self.
 
     "Modified: 6.9.1995 / 20:26:06 / claus"
-    "Modified: 30.10.1996 / 11:26:32 / cg"
     "Modified: 28.1.1997 / 14:59:14 / stefan"
+    "Modified: 7.3.1997 / 16:52:21 / cg"
 !
 
 initializeCommandViewIn:frame
@@ -2914,5 +2915,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.119 1997-02-25 19:17:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.120 1997-03-07 15:53:06 cg Exp $'
 ! !
hg/stx-libtool