[elpa] 92/287: Fix keys

[Matthew Fidler]

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

commit dedaf3b389484758f80727067fc704da9a000e5e
Author: Matthew L. Fidler <address@hidden>
Date:   Fri Jun 13 10:30:13 2014 -0500

    Fix keys
---
 ergoemacs-shortcuts.el |    7 ++++---
 1 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/ergoemacs-shortcuts.el b/ergoemacs-shortcuts.el
index 712ff7f..2b0ca6f 100644
--- a/ergoemacs-shortcuts.el
+++ b/ergoemacs-shortcuts.el
@@ -677,9 +677,10 @@ In addition, when the function is called:
                    (dolist (global-key (where-is-internal function))
                      (setq test (gethash global-key 
ergoemacs-original-keys-to-shortcut-keys))
                      (when test
-                       (unless (eq (elt test 0) 'menu-bar)
-                         (push (ergoemacs-pretty-key (key-description test))
-                             keys)))))
+                       (dolist (global-key test)
+                         (unless (eq (elt global-key 0) 'menu-bar)
+                           (push (ergoemacs-pretty-key (key-description 
global-key))
+                                 keys))))))
                   (let (ergoemacs-modal ergoemacs-repeat-keys 
ergoemacs-read-input-keys
                                         ergoemacs-shortcut-keys)
                     (dolist (global-key (where-is-internal function))