ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix possible compiler warning when excluding modes

Browse source
This commit is contained in:
Tom Willemse 2016-06-10 14:46:24 +02:00
parent cb337a15d1
commit 390d8b2cc8
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
emacs/.emacs.d/init.el
View file

@ -122,7 +122,8 @@ MODE1 is enabled and vice-versa."
(defun ,function-name () (defun ,function-name ()
,(concat "Toggle `" mode2-name ,(concat "Toggle `" mode2-name
"' according to the inverse of `" mode1-name "'.") "' according to the inverse of `" mode1-name "'.")
(,mode2 (or (not ,mode1) -1))) (let ((mode ',mode2))
(funcall mode (or (not ,mode1) -1))))
(add-hook ',(intern (concat mode1-name "-hook")) (add-hook ',(intern (concat mode1-name "-hook"))
#',function-name)))) #',function-name))))