[elpa] externals/ergoemacs-mode d66bd33 162/325: Fix calc binding for undo and C-f test

[Stefan Monnier]

branch: externals/ergoemacs-mode
commit d66bd33e3d02a10861517ec5203eedbc07bc319f
Author: Walter Landry <wlandry@caltech.edu>
Commit: Walter Landry <wlandry@caltech.edu>

    Fix calc binding for undo and C-f test
---
 ergoemacs-test.el   | 2 +-
 ergoemacs-themes.el | 5 +++++
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/ergoemacs-test.el b/ergoemacs-test.el
index b0778cf..152c1ce 100644
--- a/ergoemacs-test.el
+++ b/ergoemacs-test.el
@@ -265,7 +265,7 @@ sunt in culpa qui officia deserunt mollit anim id est 
laborum.")
   (ergoemacs-test-layout
    :layout "us"
    (ergoemacs-eshell-here)
-   (should (eq 'isearch-forward (key-binding (kbd "C-f"))))
+   (should (eq 'ergoemacs-isearch-forward (key-binding (kbd "C-f"))))
    (kill-buffer (current-buffer))))
 
 (ert-deftest ergoemacs-test-isearch-works-with-region ()
diff --git a/ergoemacs-themes.el b/ergoemacs-themes.el
index 00dbdae..ae1191e 100644
--- a/ergoemacs-themes.el
+++ b/ergoemacs-themes.el
@@ -1227,6 +1227,11 @@ calling any other ergoemacs-set-* function"
   )
 (add-hook 'dired-load-hook #'ergoemacs-install-dired-bindings)
 
+(defun ergoemacs-install-calc-bindings ()
+  (define-key calc-mode-map [remap ergoemacs-undo] 'calc-undo)
+  )
+(add-hook 'calc-load-hook #'ergoemacs-install-calc-bindings)
+
 (ergoemacs-translation normal ()
   "Identify transformation"
   :keymap (let ((map (make-sparse-keymap)))