diff --git a/define-repeat-map.el b/define-repeat-map.el index 13ecbaf..1a8466f 100644 --- a/define-repeat-map.el +++ b/define-repeat-map.el @@ -82,7 +82,6 @@ map. However, their invocations keep the `repeat-map' active." ;; Add the map to the commands' repeat-map property. (push `(progn ,@(define-repeat-map--map-commands - `,map (lambda (cmd) `(put ',cmd 'repeat-map ',map)) (cdr arg))) define-repeat-map--result)) @@ -103,7 +102,6 @@ map. However, their invocations keep the `repeat-map' active." (lambda (cmd) (define-repeat-map--make-alias cmd map)) (cdr arg)) ,@(define-repeat-map--map-commands - `,map (lambda (cmd) (let ((alias (define-repeat-map--make-alias cmd map))) `(progn @@ -120,7 +118,6 @@ map. However, their invocations keep the `repeat-map' active." (push `(progn ,@(define-repeat-map--define-keys `,map #'identity arg) ,@(define-repeat-map--map-commands - `,map (lambda (cmd) `(put ',cmd 'repeat-map ',map)) arg)) define-repeat-map--result))))