branch: externals/ergoemacs-mode
commit d66bd33e3d02a10861517ec5203eedbc07bc319f
Author: Walter Landry <[email protected]>
Commit: Walter Landry <[email protected]>
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)))
