[elpa] 16/117: Advise describe-buffer-bindings

[Matthew Fidler]

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

commit 025143d4e5151f2887cd513088bc3e02b6beb848
Author: Matthew L. Fidler <address@hidden>
Date:   Tue Jul 15 08:01:24 2014 -0500

    Advise describe-buffer-bindings
---
 ergoemacs-advices.el |    5 +++++
 1 files changed, 5 insertions(+), 0 deletions(-)

diff --git a/ergoemacs-advices.el b/ergoemacs-advices.el
index 8a0c3c6..f522326 100644
--- a/ergoemacs-advices.el
+++ b/ergoemacs-advices.el
@@ -62,6 +62,11 @@ If `pre-command-hook' is used and `ergoemacs-mode' is remove 
from `ergoemacs-pre
    (t
     ad-do-it)))
 
+(defadvice describe-buffer-bindings (around ergoemacs-describe-buffer-bindings 
activate)
+  "Describes buffer bindings without `ergoemacs-read-input-keys' enabled"
+  (let (ergoemacs-read-input-keys)
+    ad-do-it))
+
 (defadvice define-key (around ergoemacs-define-key-advice (keymap key def) 
activate)
   "This does the right thing when modifying `ergoemacs-keymap'.
 Also adds keymap-flag for user-defined keys run with `run-mode-hooks'."