[elpa] 70/117: Fix unbound keys test

[Matthew Fidler]

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

commit 0e551a2015ba07ebc168256e0790c25f8b8b012c
Author: Matthew L. Fidler <address@hidden>
Date:   Fri Jul 18 10:55:19 2014 -0500

    Fix unbound keys test
---
 ergoemacs-test.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/ergoemacs-test.el b/ergoemacs-test.el
index 24467a3..f563ab0 100644
--- a/ergoemacs-test.el
+++ b/ergoemacs-test.el
@@ -1008,7 +1008,8 @@ Selected mark would not be cleared after paste."
 (declare-function ergoemacs-real-key-binding "ergoemacs-advices.el" (key 
&optional accept-default no-remap position) t)
 (ert-deftest ergoemacs-test-unbind-commands-active ()
   "Make sure the unbound keys work"
-  (should (eq 'ergoemacs-undefined (ergoemacs-real-key-binding (read-kbd-macro 
"C-x C-s")))))
+  (let (ergoemacs-shortcut-keys ergoemacs-mode ergoemacs-read-input-keys)
+    (should (eq 'ergoemacs-undefined (ergoemacs-real-key-binding 
(read-kbd-macro "C-x C-s"))))))
 
 (declare-function ergoemacs-shortcut-for-command "ergoemacs-menus.el")
 (declare-function ergoemacs-kbd-to-key "ergoemacs-menus.el")