diff options
author | Tom Willemse | 2014-01-22 21:45:59 +0100 |
---|---|---|
committer | Tom Willemse | 2014-01-22 21:45:59 +0100 |
commit | de22484c7926c86965896dab767e55d197af61f4 (patch) | |
tree | 1a9e9bbd850611e7eaa8f44d1a8977a9161953a2 | |
parent | b8214a03123e52e9b8abc24f927cef71e5f984ec (diff) | |
download | upcase-mode-master.tar.gz upcase-mode-master.zip |
-rw-r--r-- | upcase-mode.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/upcase-mode.el b/upcase-mode.el index c81e8a8..725dbd7 100644 --- a/upcase-mode.el +++ b/upcase-mode.el @@ -32,10 +32,12 @@ (defvar upcase-transient-map (let ((map (make-sparse-keymap))) (define-key map [remap self-insert-command] #'upcase-self-insert-command) - map)) + map) + "The transient keymap that will take effect.") (defvar upcase-character-map - #s(hash-table data (?- ?_))) + #s(hash-table data (?- ?_)) + "Extra characters to switch.") (defun upcase-self-insert-command () "Wrap `self-insert-command' to upcase the input character. |