From e2d70c038ea077c7141f3de25d58701d6a7e61ab Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 23 Apr 2002 00:48:15 +0000
Subject: [PATCH] .

original commit: 7ac155d1b41f5ebe7100b8ad6bbed99f5cb37cb9
---
 collects/framework/private/keymap.ss | 1 +
 1 file changed, 1 insertion(+)

diff --git a/collects/framework/private/keymap.ss b/collects/framework/private/keymap.ss
index f11991b7..80c7ed89 100644
--- a/collects/framework/private/keymap.ss
+++ b/collects/framework/private/keymap.ss
@@ -968,6 +968,7 @@
 	      (map "a:v" "paste-clipboard")
 	      (map "d:v" "paste-clipboard")
 	      (map "c:_" "undo")
+	      (map (format "~a" (integer->char 31)) "undo") ; for Windows - strange
 	      (map "c:+" "redo")
 	      (map "a:z" "undo")
 	      (map "d:z" "undo")