hiro/boon
1
0
Fork 0
mirror of https://github.com/vale981/boon synced 2025-03-04 17:11:40 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tweak

Browse source
This commit is contained in:
Jean-Philippe Bernardy 2016-11-17 23:00:24 +01:00
parent f9ca220eed
commit 3a45594f22
2 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
boon-core.el
View file

@ -11,6 +11,9 @@
;; Maps ;; Maps
(defgroup boon nil "Boon" :group 'Editing)
(defvar boon-x-map)
(define-prefix-command 'boon-x-map) (define-prefix-command 'boon-x-map)
(set-keymap-parent boon-x-map ctl-x-map) (set-keymap-parent boon-x-map ctl-x-map)

2
boon-utils.el
View file

@ -14,7 +14,7 @@
,body ,body
(progn (exchange-point-and-mark) ,body (exchange-point-and-mark)))) (progn (exchange-point-and-mark) ,body (exchange-point-and-mark))))
(defcustom boon-hints-enabled 't "Display hints." :group 'boon) (defcustom boon-hints-enabled 't "Display hints." :group 'boon :type 'boolean)
(defun boon-hint (msg) (defun boon-hint (msg)
"Provide MSG as a hint." "Provide MSG as a hint."