#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Fri, 17 May 2019 16:50:59 +0200
changeset 18764 5d89bf2426bf
parent 18763 6a3d3a6ac24e
child 18765 01fbee71432b
#REFACTORING by stefan Sanitize BlockValues class: BookmarkListEditor changed: #hasFolderSelectedHolder #hasSelectionHolder
BookmarkListEditor.st
--- a/BookmarkListEditor.st	Fri May 17 16:50:16 2019 +0200
+++ b/BookmarkListEditor.st	Fri May 17 16:50:59 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  Copyright (c) 2007-2010 Jan Vrany, SWING Research Group, Czech Technical University in Prague
  Copyright (c) 2009-2010 eXept Software AG
@@ -378,25 +380,25 @@
 !
 
 hasFolderSelectedHolder
-
-    ^BlockValue 
+    ^ BlockValue 
         with:[:selectionHolder|
-                |sel|
-                (sel := selectionHolder value) notNil
-                and:[sel isFolderBookmark ]
+                selectionHolder notNil
+                    and:[selectionHolder isFolderBookmark]
              ]
+        argument:self selectionHolder
+
+    "Created: / 02-06-2011 / 10:55:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 17-05-2019 / 15:36:41 / Stefan Vogel"
+    "Modified (format): / 17-05-2019 / 16:50:44 / Stefan Vogel"
+!
+
+hasSelectionHolder
+    ^ BlockValue 
+        with:[:selectionHolder| selectionHolder notNil]
         argument: self selectionHolder
 
     "Created: / 02-06-2011 / 10:55:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-hasSelectionHolder
-
-    ^BlockValue 
-        with:[:selectionHolder|selectionHolder value notNil]
-        argument: self selectionHolder
-
-    "Created: / 02-06-2011 / 10:55:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 17-05-2019 / 15:37:07 / Stefan Vogel"
 !
 
 selectionHolder