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

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

[elpa] 87/117: Handle the (keymap (keymap ...)) composed keymap


From: Matthew Fidler
Subject: [elpa] 87/117: Handle the (keymap (keymap ...)) composed keymap
Date: Fri, 25 Jul 2014 13:24:29 +0000

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

commit e8cd727bde4b81aa6fe6602dccf5ea0f9cc71977
Author: Matthew L. Fidler <address@hidden>
Date:   Tue Jul 22 09:36:07 2014 -0500

    Handle the (keymap (keymap ...)) composed keymap
---
 ergoemacs-mode.el |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/ergoemacs-mode.el b/ergoemacs-mode.el
index f3dd101..dc066b4 100644
--- a/ergoemacs-mode.el
+++ b/ergoemacs-mode.el
@@ -87,7 +87,10 @@ PRE-VECTOR is to help define the full key-vector sequence."
         (define-key parent key (cdr item)))
        ((and key (ignore-errors (eq 'keymap (nth 1 item))))
         (ergoemacs-flatten-composed-keymap--define-key (cdr item) parent key))
-       (t )))))
+       ((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))))))
 
 (defun ergoemacs-flatten-composed-keymap (keymap)
   "Flattens a composed KEYMAP.



reply via email to

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