adjusted keybindings

svn: r10639

original commit: 6d3ab9487f533d0d3b5c692ba1f78ede5e956e0b

collects/framework/private/keymap.ss

@@ -1392,13 +1392,13 @@
                    (string-append
                     (case (system-type)
                       [(macosx macos) "d:"]
-                      [(windows) "c:"]
-                      [(unix) "a:"]
+                      [(windows unix) "c:"]
                       [else (error 'keymap.ss "unknown platform: ~s" (system-type))])
                     key)
                    func))])
       (add/map "editor-undo" 'undo "z")
-      (add/map "editor-redo" 'redo "y")
+      (unless (eq? (system-type) 'macosx)
+	(add/map "editor-redo" 'redo "y"))
       (add/map "editor-cut" 'cut "x")
       (add/map "editor-copy" 'copy "c")
       (add/map "editor-paste" 'paste "v")