diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-08 11:36:10 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-08 15:42:40 -0700 |
commit | 437f244ba2a8a539ba82ef0a60e6517c547ec1fd (patch) | |
tree | 91d5a54848487a29144e415e507a85caf76379db /.emacs.d/site-lisp | |
parent | f50698900b0e40e6f60c66024ebfc76fd655cf3c (diff) | |
download | dotfiles-437f244ba2a8a539ba82ef0a60e6517c547ec1fd.tar.gz |
transient-cycles: don't use private names for augmented commands
Diffstat (limited to '.emacs.d/site-lisp')
-rw-r--r-- | .emacs.d/site-lisp/transient-cycles.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/.emacs.d/site-lisp/transient-cycles.el b/.emacs.d/site-lisp/transient-cycles.el index abb7888e..c4f512f0 100644 --- a/.emacs.d/site-lisp/transient-cycles.el +++ b/.emacs.d/site-lisp/transient-cycles.el @@ -179,9 +179,8 @@ argument to `set-transient-map'." (eq 'remap (aref original 0))) (cons original (aref original 1))) (t original)) - for name = (intern - (format "transient-cycles--%s-with-transient-cycling" - (symbol-name original*))) + for name + = (intern (format "transient-cycles-cmd-%s" (symbol-name original*))) collect `(defun ,name () ,(format "Like `%s', but augmented with transient cycling." |