svn: r16286
This commit is contained in:
parent
820b63d4a7
commit
1b6c879736
|
@ -30,7 +30,7 @@
|
|||
(parameterize ([read-accept-reader #t])
|
||||
(call-with-input-file path read)))])
|
||||
(match sexp
|
||||
[`(module ,name ,(? valid-key-bindings-lang?)
|
||||
[`(module ,name ,(? valid-keybindings-lang?)
|
||||
,@(x ...))
|
||||
(let ([km (dynamic-require spec '#%keymap)])
|
||||
(hash-set! user-keybindings-files spec km)
|
||||
|
|
Loading…
Reference in New Issue
Block a user