fix void result to match contract

Merge to 5.1.2 if Robby agrees
2011-07-16 08:38:05 -06:00 · 2011-07-16 08:38:05 -06:00 · 5e0d6e0dee
commit 5e0d6e0dee
parent 59499b84bd
1 changed files with 2 additions and 1 deletions
--- 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