Fix quoting bugs

main^2
Case Duckworth 1 year ago
parent 647605457b
commit b12f781155
  1. 4
      define-repeat-map.el

@ -44,7 +44,7 @@
(while args
(let ((key (pop args))
(cmd (funcall fn (pop args))))
(push `(define-key ,map `(kbd ,key) #',cmd)
(push `(define-key ,map (kbd ,key) #',cmd)
res)))
(reverse res)))
@ -125,7 +125,7 @@
arg))
define-repeat-map--result))))
`(add-hook repeat-mode-hook
`(add-hook 'repeat-mode-hook
(lambda nil
,@(reverse define-repeat-map--result)))))

Loading…
Cancel
Save