branch: externals/assess
commit 36093a2c6b21d4a0fe740898d08fdd4be36bd00a
Author: Phillip Lord <phillip.l...@russet.org.uk>
Commit: Phillip Lord <phillip.l...@russet.org.uk>
Fix keybinding for edmacro. Add test.
---
README.md | 6 +++++-
assess-robot.el | 4 ++--
test/assess-robot-test.el | 13 ++++++++++++-
3 files changed, 19 insertions(+), 4 deletions(-)
diff --git a/README.md b/README.md
index 77f1c66834..5c7ce55f88 100644
--- a/README.md
+++ b/README.md
@@ -24,7 +24,7 @@ Assess is fully documented using the `lentic-doc`
documentation system.
Status
------
-It is now a 0.2 release; for those parts that already exist I do not expected
+It is now an early release; for those parts that already exist I do not
expected
to change the interface, but it could happen. It is ready for careful use,
therefore.
@@ -37,6 +37,10 @@ Emacs-25.1 release.
Release
-------
+## Version 0.3.1
+
+Add test, fix keybinding
+
## Version 0.3
Add assess-robot.el
diff --git a/assess-robot.el b/assess-robot.el
index b9d31680d9..7bc57fb0ce 100644
--- a/assess-robot.el
+++ b/assess-robot.el
@@ -103,9 +103,9 @@ In this case, MACRO is the \"long form\" accepted by
(point-max))))
(edmacro-finish-edit)))
-(with-eval-after-load
+(eval-after-load
'edmacro
- (define-key edmacro-mode-map "C-c C-k" 'assess-robot-copy-and-finish))
+ '(define-key edmacro-mode-map (kbd "C-c C-k") 'assess-robot-copy-and-finish))
(provide 'assess-robot)
;;; assess-robot.el ends here
diff --git a/test/assess-robot-test.el b/test/assess-robot-test.el
index e7e7868d18..1ee36b14a6 100644
--- a/test/assess-robot-test.el
+++ b/test/assess-robot-test.el
@@ -26,6 +26,7 @@
;;; Code:
+(require 'assess)
(require 'assess-robot)
(require 'ert)
@@ -54,7 +55,6 @@
(assess-robot-with-temp-switched-buffer
(current-buffer)))))
-
(ert-deftest assess-robot-test-with-switched-buffer-string ()
(should
(assess=
@@ -62,4 +62,15 @@
(assess-robot-with-switched-buffer-string
(insert "hello")))))
+(ert-deftest assess-robot-test-execute-kmacro ()
+ (should
+ (assess=
+ "hello"
+ (assess-robot-with-switched-buffer-string
+ (assess-robot-execute-kmacro
+"
+hello ;; self-insert-command * 5
+")))))
+
+
(provide 'assess-robot-test)
