fix bad edit in a8473ec1aaa2b623b3ce622e4775ceddfbaecf07

original commit: 314eee08046700e4748f393faaffc55654f1fd14
This commit is contained in:
Robby Findler 2013-06-22 18:32:18 -05:00
parent 999ccfb215
commit e18a1de431

View File

@ -1351,7 +1351,7 @@
(λ (kmap)
(let* ([map (λ (key func)
(send kmap map-function key func))]
[map-meta (λ (key func mask-control?)
[map-meta (λ (key func)
(send-map-function-meta kmap key func
(regexp-match has-control-regexp key)))]
[add (λ (name func)