[elpa] 103/117: Only complain when initially changing the key

[Matthew Fidler]

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

commit 6e95957aea2994e1ebd5b7b27f299396fd66d1b1
Author: Matthew L. Fidler <address@hidden>
Date:   Thu Jul 24 09:04:45 2014 -0500

    Only complain when initially changing the key
---
 ergoemacs-theme-engine.el |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/ergoemacs-theme-engine.el b/ergoemacs-theme-engine.el
index b1264f3..a8a5821 100644
--- a/ergoemacs-theme-engine.el
+++ b/ergoemacs-theme-engine.el
@@ -2235,10 +2235,11 @@ DONT-COLLAPSE doesn't collapse empty keymaps"
           (when (and (or (commandp lk t)
                          (keymapp lk))
                      (not (member key '([remap] ))))
+            (when (not (member key ergoemacs-global-override-rm-keys))
+              (message "Removing %s because of globally bound %s"
+                       (ergoemacs-pretty-key (key-description key)) lk))
             (pushnew key ergoemacs-global-override-rm-keys
                      :test 'equal)
-            (message "Removing %s because of globally bound %s"
-                     (ergoemacs-pretty-key (key-description key)) lk)
             (throw 'found-global-command t)))
         (setq key (substring key 0 (- (length key) 1)))))))