emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] 42/117: Possibly address Issue #276


From: Matthew Fidler
Subject: [elpa] 42/117: Possibly address Issue #276
Date: Fri, 25 Jul 2014 13:24:06 +0000

mlf176f2 pushed a commit to branch externals/ergoemacs-mode
in repository elpa.

commit 81a03433c06b1ba8336a810334f5b2b98e826bc0
Author: Matthew L. Fidler <address@hidden>
Date:   Wed Jul 16 13:40:42 2014 -0500

    Possibly address Issue #276
---
 ergoemacs-advices.el |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/ergoemacs-advices.el b/ergoemacs-advices.el
index b4bf395..28e066d 100644
--- a/ergoemacs-advices.el
+++ b/ergoemacs-advices.el
@@ -72,8 +72,9 @@ If `pre-command-hook' is used and `ergoemacs-mode' is remove 
from `ergoemacs-pre
 (defadvice define-key (around ergoemacs-define-key-advice (keymap key def) 
activate)
   "This does the right thing when modifying `ergoemacs-keymap'.
 Also adds keymap-flag for user-defined keys run with `run-mode-hooks'."
-  (let ((is-global-p (equal keymap (current-global-map))))
-    (if (and ergoemacs-run-mode-hooks
+  (let ((is-global-p (equal keymap (current-global-map)))
+        (is-local-p (equal keymap (current-local-map))))
+    (if (and (or is-local-p ergoemacs-run-mode-hooks)
              (not (equal keymap (current-global-map)))
              (not (equal keymap ergoemacs-keymap)))
         (let ((ergoemacs-run-mode-hooks nil)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]