diff options
| author | Case Duckworth | 2022-01-06 15:48:19 -0600 |
|---|---|---|
| committer | Case Duckworth | 2022-01-06 15:48:30 -0600 |
| commit | 75e03850c0ba098208c4999518b1b164c63a5eff (patch) | |
| tree | 0118b26c64feef3470a1a3331a7436fa42a7f588 | |
| parent | Add +kill-word-backward-or-region (diff) | |
| download | emacs-75e03850c0ba098208c4999518b1b164c63a5eff.tar.gz emacs-75e03850c0ba098208c4999518b1b164c63a5eff.zip | |
Fix naming bug
I also added aliases just in case I forget the proper names for these maps again.
| -rw-r--r-- | init.el | 2 | ||||
| -rw-r--r-- | lisp/+casing.el | 2 | ||||
| -rw-r--r-- | lisp/+lookup.el | 2 |
3 files changed, 5 insertions, 1 deletions
| diff --git a/init.el b/init.el index a822cb8..432ded7 100644 --- a/init.el +++ b/init.el | |||
| @@ -1237,7 +1237,7 @@ See also `crux-reopen-as-root-mode'." | |||
| 1237 | :host github | 1237 | :host github |
| 1238 | :repo "duckwork/titlecase.el" | 1238 | :repo "duckwork/titlecase.el" |
| 1239 | :files ("*"))) | 1239 | :files ("*"))) |
| 1240 | (:with-map +casing-map | 1240 | (:with-map +casing-mode-map |
| 1241 | (:bind "t" #'titlecase-dwim))) | 1241 | (:bind "t" #'titlecase-dwim))) |
| 1242 | 1242 | ||
| 1243 | (setup (:straight topsy) | 1243 | (setup (:straight topsy) |
| diff --git a/lisp/+casing.el b/lisp/+casing.el index a21e710..5f39b2e 100644 --- a/lisp/+casing.el +++ b/lisp/+casing.el | |||
| @@ -75,5 +75,7 @@ Otherwise, it calls `capitalize-word' on the word at point (using | |||
| 75 | (define-key +key-mode-map (kbd "M-c") (when +casing-mode | 75 | (define-key +key-mode-map (kbd "M-c") (when +casing-mode |
| 76 | +casing-mode-map))) | 76 | +casing-mode-map))) |
| 77 | 77 | ||
| 78 | (defvaralias '+casing-map '+casing-mode-map) | ||
| 79 | |||
| 78 | (provide '+casing) | 80 | (provide '+casing) |
| 79 | ;;; +casing.el ends here | 81 | ;;; +casing.el ends here |
| diff --git a/lisp/+lookup.el b/lisp/+lookup.el index 8fa8795..755f84e 100644 --- a/lisp/+lookup.el +++ b/lisp/+lookup.el | |||
| @@ -20,5 +20,7 @@ | |||
| 20 | (define-key +key-mode-map (kbd "C-c l") (when +lookup-mode | 20 | (define-key +key-mode-map (kbd "C-c l") (when +lookup-mode |
| 21 | +lookup-mode-map))) | 21 | +lookup-mode-map))) |
| 22 | 22 | ||
| 23 | (defvaralias '+lookup-map '+lookup-mode-map) | ||
| 24 | |||
| 23 | (provide '+lookup) | 25 | (provide '+lookup) |
| 24 | ;;; +lookup.el ends here | 26 | ;;; +lookup.el ends here |