diff --git a/src/pd.tk b/src/pd.tk
index c8251176604c7ac548510a73fc26ea32024fc609..1b4f8a5144222e02546bb6d8afa47cdb84e2002e 100644
--- a/src/pd.tk
+++ b/src/pd.tk
@@ -2956,8 +2956,10 @@ proc pdtk_canvas_new {name width height geometry editable} {
         bind $name.c <Button-5>  "pdtk_canvas_scroll $name.c y +1"
         bind $name.c <Shift-Button-4>  "pdtk_canvas_scroll $name.c x -1"
         bind $name.c <Shift-Button-5>  "pdtk_canvas_scroll $name.c x +1"
-        bind $name.c <Control-Button-4>  "pdtk_zoom $name 1"
-        bind $name.c <Control-Button-5>  "pdtk_zoom $name -1"
+		if { $k12_mode == 0 } {
+		    bind $name.c <Control-Button-4>  "pdtk_zoom $name 1"
+		    bind $name.c <Control-Button-5>  "pdtk_zoom $name -1"
+		}
     } default {
         bind $name.c  <MouseWheel> \
             "pdtk_canvas_scroll $name.c y \[expr -abs(%D)/%D\]"