From 8941903f41920f49335adb1e7d1976259261620b Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sat, 16 Jul 2011 08:38:05 -0600
Subject: [PATCH] fix void result to match contract

 Merge to 5.1.2 if Robby agrees

original commit: 5e0d6e0deed790c8a5104475beb26a156704ec59
---
 collects/framework/private/keymap.rkt | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/collects/framework/private/keymap.rkt b/collects/framework/private/keymap.rkt
index 62b6a4a8..665fd05e 100644
--- a/collects/framework/private/keymap.rkt
+++ b/collects/framework/private/keymap.rkt
@@ -1373,7 +1373,8 @@
              'framework:automatic-parens
              (lambda (id new-val)
                (cond [new-val (add-automatic-paren-bindings)]
-                     [else    (remove-automatic-paren-bindings)]))))
+                     [else    (remove-automatic-paren-bindings)])))
+            (void))
           ))))
   
   (define setup-search