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.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 28 Jul 1997 16:54:27 +0200
changeset 1254 d515875ab8af
parent 1253 7f161a49093e
child 1255 d9f620c80581
checkin from browser
BrowserView.st file | annotate | diff | comparison | revisions
BrwsrView.st file | annotate | diff | comparison | revisions 
--- a/BrowserView.st	Mon Jul 28 09:20:30 1997 +0200
+++ b/BrowserView.st	Mon Jul 28 16:54:27 1997 +0200
@@ -5440,7 +5440,14 @@
         classToggle leftInset:halfSpace.
         instanceToggle rightInset:ViewSpacing - halfSpace.
         classToggle rightInset:ViewSpacing - halfSpace.
-    ].
+
+"/        styleSheet name == #motif ifTrue:[
+            instanceToggle showLamp:true.
+            classToggle showLamp:true.
+"/        ]
+    ].
+
+    "Modified: 28.7.1997 / 16:52:07 / cg"
 !
 
 focusSequence
@@ -10248,6 +10255,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.317 1997-07-24 16:16:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.318 1997-07-28 14:54:27 cg Exp $'
 ! !
 BrowserView initialize!
--- a/BrwsrView.st	Mon Jul 28 09:20:30 1997 +0200
+++ b/BrwsrView.st	Mon Jul 28 16:54:27 1997 +0200
@@ -5440,7 +5440,14 @@
         classToggle leftInset:halfSpace.
         instanceToggle rightInset:ViewSpacing - halfSpace.
         classToggle rightInset:ViewSpacing - halfSpace.
-    ].
+
+"/        styleSheet name == #motif ifTrue:[
+            instanceToggle showLamp:true.
+            classToggle showLamp:true.
+"/        ]
+    ].
+
+    "Modified: 28.7.1997 / 16:52:07 / cg"
 !
 
 focusSequence
@@ -10248,6 +10255,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.317 1997-07-24 16:16:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.318 1997-07-28 14:54:27 cg Exp $'
 ! !
 BrowserView initialize!
hg/stx-libtool