[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 55/287: Nicer theme debugging display
From: |
Matthew Fidler |
Subject: |
[elpa] 55/287: Nicer theme debugging display |
Date: |
Wed, 02 Jul 2014 14:44:34 +0000 |
mlf176f2 pushed a commit to branch externals/ergoemacs-mode
in repository elpa.
commit 3d467dd3c3ec77d82cb67a7c54dc10a1be921817
Author: Matthew L. Fidler <address@hidden>
Date: Fri Jun 6 08:14:15 2014 -0500
Nicer theme debugging display
---
ergoemacs-theme-engine.el | 12 ++++++++----
1 files changed, 8 insertions(+), 4 deletions(-)
diff --git a/ergoemacs-theme-engine.el b/ergoemacs-theme-engine.el
index 25f705e..5c41c01 100644
--- a/ergoemacs-theme-engine.el
+++ b/ergoemacs-theme-engine.el
@@ -234,7 +234,8 @@
modify-map
deferred-keys
full-map) obj
- (ergoemacs-debug "%s %s" stars object-name)
+ (ergoemacs-debug "%s %s" (or (and (string= stars "") "Keymap:")
+ stars) object-name)
(ergoemacs-debug "Deferred Keys: %s" deferred-keys)
(cond
((ergoemacs-keymap-empty-p read-map)
@@ -898,9 +899,12 @@ ergoemacs-get-keymaps-for-hook OBJ HOOK")
(ergoemacs-debug "*** Hooks")
(dolist (hook (ergoemacs-get-hooks obj))
(ergoemacs-debug "**** %s" hook)
- (dolist (map (ergoemacs-get-keymaps-for-hook obj hook))
- (ergoemacs-debug-obj (ergoemacs-get-fixed-map obj map)
- "*****")))
+ (setq tmp (ergoemacs-get-keymaps-for-hook obj hook))
+ (if (= 1 (length tmp))
+ (ergoemacs-debug-obj (ergoemacs-get-fixed-map obj (nth 0 tmp)) "")
+ (dolist (map tmp)
+ (ergoemacs-debug-obj (ergoemacs-get-fixed-map obj map)
+ "*****"))))
(ergoemacs-debug "*** Emulations" )
(dolist (mode (ergoemacs-get-hooks obj "-mode\\'"))
(ergoemacs-debug-obj (ergoemacs-get-fixed-map obj mode) "****"))
- [elpa] 49/287: Bug fix for substitute-command-keys, (continued)
- [elpa] 49/287: Bug fix for substitute-command-keys, Matthew Fidler, 2014/07/02
- [elpa] 43/287: Be more conservative with substituting key commands., Matthew Fidler, 2014/07/02
- [elpa] 46/287: Fix Issue #7, Matthew Fidler, 2014/07/02
- [elpa] 50/287: Another bug-fix for substitute-command-keys, Matthew Fidler, 2014/07/02
- [elpa] 52/287: Debugging ergoemacs-theme obect, Matthew Fidler, 2014/07/02
- [elpa] 51/287: more substitute-command-keys fixes, Matthew Fidler, 2014/07/02
- [elpa] 58/287: Fix misplaced paren, Matthew Fidler, 2014/07/02
- [elpa] 57/287: Added basic variable/mode initialization routines., Matthew Fidler, 2014/07/02
- [elpa] 54/287: Maps seem correct now, Matthew Fidler, 2014/07/02
- [elpa] 48/287: Unstage the incompatible, Matthew Fidler, 2014/07/02
- [elpa] 55/287: Nicer theme debugging display,
Matthew Fidler <=
- [elpa] 56/287: Better key replacements., Matthew Fidler, 2014/07/02
- [elpa] 64/287: Replace either M-x or <execute> with M-x code., Matthew Fidler, 2014/07/02
- [elpa] 63/287: Fixed mapvar issues., Matthew Fidler, 2014/07/02
- [elpa] 47/287: Stage some components, Matthew Fidler, 2014/07/02
- [elpa] 62/287: Playing with object more., Matthew Fidler, 2014/07/02
- [elpa] 53/287: Better debug and modify keymaps fix bugs, Matthew Fidler, 2014/07/02
- [elpa] 59/287: Fix typo, Matthew Fidler, 2014/07/02
- [elpa] 61/287: Ergoemacs-mode setup with object almost complete., Matthew Fidler, 2014/07/02
- [elpa] 66/287: Make ergoemacs-clean toggle debug on error, Matthew Fidler, 2014/07/02
- [elpa] 71/287: Fix isearch issues., Matthew Fidler, 2014/07/02