class: SelectionInTreeView
authorClaus Gittinger <cg@exept.de>
Sat, 13 Jul 2013 22:31:34 +0200
changeset 4272 7372fb880713
parent 4271 7b394cc48096
child 4273 d56dfb04df83
class: SelectionInTreeView changed: #selectionFromModel use asNilIfEmpty
SelectionInTreeView.st
--- a/SelectionInTreeView.st	Wed Jul 10 18:41:41 2013 +0200
+++ b/SelectionInTreeView.st	Sat Jul 13 22:31:34 2013 +0200
@@ -1791,9 +1791,7 @@
                 ].
             ].
 
-            coll isEmpty ifTrue:[
-                coll := nil
-            ].
+            coll := coll asNilIfEmpty.
         ].
     ].
     self setSelection:coll
@@ -2504,10 +2502,10 @@
 !SelectionInTreeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.117 2013-06-26 08:20:52 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.118 2013-07-13 20:31:34 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.117 2013-06-26 08:20:52 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.118 2013-07-13 20:31:34 cg Exp $'
 ! !