mlf176f2 pushed a commit to branch externals/ergoemacs-mode in repository elpa.
commit 310f509bd6f8a1a539d001c0a6f03607c80b60ee Author: Matthew L. Fidler <[email protected]> Date: Fri May 23 20:52:41 2014 +0800 Took out usless argument to ergoemacs-global-set-key-after --- ergoemacs-advices.el | 6 +++--- 1 files changed, 3 insertions(+), 3 deletions(-) diff --git a/ergoemacs-advices.el b/ergoemacs-advices.el index 5b2c57c..b12d95a 100644 --- a/ergoemacs-advices.el +++ b/ergoemacs-advices.el @@ -85,14 +85,14 @@ Also adds keymap-flag for user-defined keys run with `run-mode-hooks'." ad-do-it (when is-global-p (let ((vk key)) - (ergoemacs-global-set-key-after key def) + (ergoemacs-global-set-key-after key) (unless (vectorp vk) ;; Do vector def too. (setq vk (read-kbd-macro (key-description key) t)) - (ergoemacs-global-set-key-after vk def)))))) + (ergoemacs-global-set-key-after vk)))))) (defvar ergoemacs-global-override-rm-keys '()) ;;; Advices enabled or disabled with ergoemacs-mode -(defun ergoemacs-global-set-key-after (key command) +(defun ergoemacs-global-set-key-after (key) (if (and (boundp 'no-ergoemacs-advice) no-ergoemacs-advice) nil (unless (or (and (vectorp key) (memq (elt key 0) '(menu-bar 27 remap)))
