#REFACTORING by stefan
Sanitize BlockValues
class: JavaCodeBundleEditor
changed:
#canAddHolder
#canEditHolder
#canRemoveHolder
--- a/tools/JavaCodeBundleEditor.st Thu Apr 11 18:36:26 2019 +0200
+++ b/tools/JavaCodeBundleEditor.st Fri May 17 16:56:31 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"{ Package: 'stx:libjava/tools' }"
"{ NameSpace: Smalltalk }"
@@ -327,31 +329,31 @@
!JavaCodeBundleEditor methodsFor:'aspects-queries'!
canAddHolder
- ^BlockValue
- with:[:ro :sel| ro value not" and:[sel value isNil or:[sel value libraryOrBundle isBundle]]"]
+ ^ BlockValue
+ with:[:ro :sel| ro not "and:[sel isNil or:[sel libraryOrBundle isBundle]]"]
argument: self readonlyHolder
argument: self bundleTreeSelectionHolder
"Created: / 30-01-2013 / 16:43:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 21-02-2013 / 23:42:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 17-05-2019 / 16:19:21 / Stefan Vogel"
!
canEditHolder
- ^BlockValue
- with:[:ro :sel|ro value not and:[sel value notNil]]
+ ^ BlockValue
+ with:[:ro :sel| ro not and:[sel notNil]]
argument: self readonlyHolder
argument: self bundleTreeSelectionHolder
"Modified: / 30-01-2013 / 16:33:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 17-05-2019 / 16:18:57 / Stefan Vogel"
!
canRemoveHolder
- ^BlockValue
- with:[:ro :sel|ro value not and:[sel value notNil]]
- argument: self readonlyHolder
- argument: self bundleTreeSelectionHolder
+ ^ self canEditHolder
"Modified: / 30-01-2013 / 16:32:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 17-05-2019 / 16:56:14 / Stefan Vogel"
! !
!JavaCodeBundleEditor methodsFor:'change & update'!