--- a/ListView.st	Fri Oct 14 18:36:03 2016 +0200
+++ b/ListView.st	Fri Oct 14 18:43:08 2016 +0200
@@ -2385,18 +2385,18 @@
 keyboardZoom:larger
     "CTRL+/- zoom action"
 
-    self keyboardZoom:larger inAllViews:false
+    self fontLargerOrSmaller:larger
 !
 
 keyboardZoom:larger inAllViews:inAllViews
     "CTRL+/- zoom action"
 
     inAllViews ifTrue:[
-        ListView allSubInstancesDo:[:each |
-            each fontLargerOrSmaller:larger 
+        SimpleView allSubInstancesDo:[:each |
+            each keyboardZoom:larger 
         ].    
     ] ifFalse:[
-        self fontLargerOrSmaller:larger 
+        self keyboardZoom:larger 
     ].
 !