ListView.st
changeset 6252 65a7558ccddf
parent 6248 74cd4f46a0d8
child 6281 5b9029e14c9e
--- a/ListView.st	Mon Jan 15 22:16:22 2018 +0100
+++ b/ListView.st	Tue Jan 16 18:15:05 2018 +0100
@@ -2414,21 +2414,21 @@
     super keyPress:key x:x y:y
 !
 
-keyboardZoom:larger
+keyboardZoom:largerBoolean
     "CTRL+/- zoom action"
 
-    self fontLargerOrSmaller:larger
-!
-
-keyboardZoom:larger inAllViews:inAllViews
+    self fontLargerOrSmaller:largerBoolean
+!
+
+keyboardZoom:largerBoolean inAllViews:inAllViews
     "CTRL+/- zoom action"
 
     inAllViews ifTrue:[
         SimpleView allSubInstancesDo:[:each |
-            each keyboardZoom:larger 
+            each keyboardZoom:largerBoolean 
         ].    
     ] ifFalse:[
-        self keyboardZoom:larger 
+        self keyboardZoom:largerBoolean 
     ].
 !