diff options
| author | Case Duckworth | 2021-03-10 20:33:32 -0600 |
|---|---|---|
| committer | Case Duckworth | 2021-03-10 20:33:32 -0600 |
| commit | a83391cb2cf5461e5e72cf6a164e573c03edf2b7 (patch) | |
| tree | 7d1866c50f6a395a70879752853166c6004a5a36 /lisp | |
| parent | uhhhhhhhh... stuff? (diff) | |
| download | emacs-a83391cb2cf5461e5e72cf6a164e573c03edf2b7.tar.gz emacs-a83391cb2cf5461e5e72cf6a164e573c03edf2b7.zip | |
Change definition of acdw/bind to not quote
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/acdw.el | 5 |
1 files changed, 2 insertions, 3 deletions
| diff --git a/lisp/acdw.el b/lisp/acdw.el index 2f0fe7d..268b9d1 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el | |||
| @@ -4,7 +4,6 @@ | |||
| 4 | ;; Created: Sometime during Covid-19, 2020 | 4 | ;; Created: Sometime during Covid-19, 2020 |
| 5 | ;; Keywords: configuration | 5 | ;; Keywords: configuration |
| 6 | ;; URL: https://tildegit.org/acdw/emacs | 6 | ;; URL: https://tildegit.org/acdw/emacs |
| 7 | ;; Bankruptcy: 5b | ||
| 8 | ;; | 7 | ;; |
| 9 | ;; This file is NOT part of GNU Emacs. | 8 | ;; This file is NOT part of GNU Emacs. |
| 10 | ;; | 9 | ;; |
| @@ -155,9 +154,9 @@ The following keywords are recognized: | |||
| 155 | (keymap (or (plist-get args :map) acdw/bind-default-map)) | 154 | (keymap (or (plist-get args :map) acdw/bind-default-map)) |
| 156 | (keycode (if (vectorp key) key (kbd key))) | 155 | (keycode (if (vectorp key) key (kbd key))) |
| 157 | (command-list)) | 156 | (command-list)) |
| 158 | (push `(define-key ,keymap ,keycode #',command) command-list) | 157 | (push `(define-key ,keymap ,keycode ',command) command-list) |
| 159 | (when after | 158 | (when after |
| 160 | (push `(autoload #',command ,@after) command-list)) | 159 | (push `(autoload ',command ,@after) command-list)) |
| 161 | `(progn | 160 | `(progn |
| 162 | ,@command-list))) | 161 | ,@command-list))) |
| 163 | 162 | ||