#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Sat, 20 Jul 2019 07:52:30 +0200
changeset 6646 e2c1a572a33e
parent 6645 f7254f12229e
child 6647 30559c1d894d
#REFACTORING by cg class: SelectionInListView changed: #dragAutoScroll: (send #isLineFullyVisible: instead of #lineIsFullyVisible:) #makeSelectionVisible (send #isLineFullyVisible: instead of #lineIsFullyVisible:)
SelectionInListView.st
--- a/SelectionInListView.st	Sat Jul 20 07:52:02 2019 +0200
+++ b/SelectionInListView.st	Sat Jul 20 07:52:30 2019 +0200
@@ -1949,7 +1949,7 @@
     ] ifFalse:[
         scrollUp := false.
         absLnNr < self size ifFalse:[ ^ false ].
-        (self lineIsFullyVisible: absLnNr + 1) ifTrue:[ ^ false ].
+        (self isLineFullyVisible: absLnNr + 1) ifTrue:[ ^ false ].
         dist := height-y.
     ].
     aDropContext contentsWillChange.
@@ -1970,7 +1970,7 @@
 
     ^ true
 
-    "Modified: / 15-06-2018 / 02:26:02 / Claus Gittinger"
+    "Modified: / 20-07-2019 / 07:51:03 / Claus Gittinger"
 !
 
 dropSource
@@ -3760,7 +3760,7 @@
             selection isEmpty ifTrue:[^ self].
             "/ don't move, if any in the selection isVisible
             selection do:[:aSelectedLine |
-                (self lineIsFullyVisible:aSelectedLine) ifTrue:[
+                (self isLineFullyVisible:aSelectedLine) ifTrue:[
                     ^ self
                 ]
             ].
@@ -3771,7 +3771,8 @@
         self makeLineVisible:line 
     ]
 
-    "Modified: / 24.2.2000 / 17:48:00 / cg"
+    "Modified: / 24-02-2000 / 17:48:00 / cg"
+    "Modified: / 20-07-2019 / 07:51:08 / Claus Gittinger"
 !
 
 nextAfterSelection