#REFACTORING by exept
authorClaus Gittinger <cg@exept.de>
Sat, 22 Feb 2020 01:51:52 +0100
changeset 19512 3fe02dbbb6dc
parent 19511 54b119c1dda6
child 19513 229c6767b2ab
#REFACTORING by exept class: ChangesBrowser changed: #changeListSelectionHolder #changeSelection: #hasSelectionHolder #initialize
ChangesBrowser.st
--- a/ChangesBrowser.st	Sat Feb 22 01:34:15 2020 +0100
+++ b/ChangesBrowser.st	Sat Feb 22 01:51:52 2020 +0100
@@ -1013,9 +1013,6 @@
 !
 
 changeListSelectionHolder
-    changeListSelectionHolder isNil ifTrue:[
-        changeListSelectionHolder := nil asValue.
-    ].
     ^ changeListSelectionHolder
 
     "Created: / 03-01-2012 / 15:19:25 / cg"
@@ -1058,7 +1055,7 @@
 hasSelectionHolder
     ^ BlockValue
         with:[:v | v notEmptyOrNil ]
-        argument:(self changeListSelectionHolder)
+        argument:changeListSelectionHolder
 
     "Created: / 03-01-2012 / 15:15:47 / cg"
 !
@@ -1567,6 +1564,8 @@
     |panel infoLabel v upperFrame buttonPanel  mH  tmH
      checkBox oldStyle codeViewBox lbl applyInOriginal|
 
+    changeListSelectionHolder := nil asValue.
+
     leftCodeLabelHolder := (self class resources string:'Current') asValue.
     rightCodeLabelHolder := (self class resources string:'Change_subst') asValue.    
 
@@ -6470,7 +6469,7 @@
         lineNumbers := lineNrCollection.
     ].
 
-    self changeListSelectionHolder value:lineNumbers.
+    changeListSelectionHolder value:lineNumbers.
     
     lineNr isNil ifTrue:[
         codeView contents:nil.