[elpa] 88/117: Add non-defined functions to map

[Matthew Fidler]

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

commit 77fccfd5d86d9fb03478679281de009236df5b1a
Author: Matthew L. Fidler <address@hidden>
Date:   Tue Jul 22 09:39:42 2014 -0500

    Add non-defined functions to map
---
 ergoemacs-mode.el |    6 ++++--
 1 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/ergoemacs-mode.el b/ergoemacs-mode.el
index dc066b4..7071be3 100644
--- a/ergoemacs-mode.el
+++ b/ergoemacs-mode.el
@@ -77,7 +77,8 @@ PRE-VECTOR is to help define the full key-vector sequence."
           i)
       (cond
        ((eq item 'keymap))
-       ((and key (ignore-errors (commandp (cdr item) t)))
+       ((and key (cdr item)
+             (ignore-errors (or (symbolp (cdr item)) (commandp (cdr item) t))))
         (setq i (lookup-key parent key))
         (when (integerp i)
           (define-key parent (substring key 0 i) nil))
@@ -90,7 +91,8 @@ PRE-VECTOR is to help define the full key-vector sequence."
        ((and key (equal key [keymap]) (keymapp item))
         (ergoemacs-flatten-composed-keymap--define-key item parent pre-vector))
        (t
-        (message "This: %s %s %s" pre-vector key item))))))
+        ;; (message "This: %s %s %s" pre-vector key item)
+        )))))
 
 (defun ergoemacs-flatten-composed-keymap (keymap)
   "Flattens a composed KEYMAP.