Mercurial Mercurial > hg > stx-libwidg2 / 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
authorca
Thu, 09 Apr 1998 13:46:05 +0200
changeset 850 70c2c0e9318f
parent 849 f7d8363fc24f
child 851 f7e436fe29ee
checkin from browser
SelTreeV.st file | annotate | diff | comparison | revisions
SelectionInTreeView.st file | annotate | diff | comparison | revisions 
--- a/SelTreeV.st	Thu Apr 09 13:37:54 1998 +0200
+++ b/SelTreeV.st	Thu Apr 09 13:46:05 1998 +0200
@@ -830,7 +830,9 @@
      y   "{ Class: SmallInteger }" 
      x   "{ Class: SmallInteger }" 
     |
-
+    aList isNil ifTrue:[
+        ^ self
+    ].
     strikeOut ifTrue:[
         y := fontHeight // 2.
         self paint:bgColor.
@@ -2044,5 +2046,5 @@
 !SelectionInTreeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelTreeV.st,v 1.56 1998-04-09 11:37:00 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelTreeV.st,v 1.57 1998-04-09 11:46:05 ca Exp $'
 ! !
--- a/SelectionInTreeView.st	Thu Apr 09 13:37:54 1998 +0200
+++ b/SelectionInTreeView.st	Thu Apr 09 13:46:05 1998 +0200
@@ -830,7 +830,9 @@
      y   "{ Class: SmallInteger }" 
      x   "{ Class: SmallInteger }" 
     |
-
+    aList isNil ifTrue:[
+        ^ self
+    ].
     strikeOut ifTrue:[
         y := fontHeight // 2.
         self paint:bgColor.
@@ -2044,5 +2046,5 @@
 !SelectionInTreeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.56 1998-04-09 11:37:00 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.57 1998-04-09 11:46:05 ca Exp $'
 ! !
hg/stx-libwidg2