hiro/boon
1
0
Fork 0
mirror of https://github.com/vale981/boon synced 2025-03-06 01:51:38 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

comments

Browse source
This commit is contained in:
Jean-Philippe Bernardy 2014-10-28 14:47:17 +01:00
parent 730cf6c217
commit bf0408a902
1 changed files with 3 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
boon-main.el
View file

@ -411,7 +411,7 @@ line."
(insert replacement))
(defun boon-quote-character (char)
"Execute the 1-character command which would be executed if boon was not enabled."
"Execute the command bound to the character CHAR if boon was not enabled."
(interactive "cThe character to insert or command to execute")
(let ((cmd
(or (and (current-local-map) (lookup-key (current-local-map) (make-string 1 char)))
@ -419,10 +419,9 @@ line."
(setq last-command-event char)
(message (format "Executing the command bound to %c" char))
(call-interactively cmd nil [char])))
(defun boon-quit ()
"Exit the current modes we're in until no special state is
remaining"
"Exit the current modes we're in until no special state is remaining."
(interactive)
(cond
((use-region-p)