summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/derived-tests.el
diff options
context:
space:
mode:
authorPo Lu <luangruo@yahoo.com>2021-12-05 08:36:40 +0800
committerPo Lu <luangruo@yahoo.com>2021-12-05 08:36:40 +0800
commit360d2d3a3328799ed8fea27bc7c13873f84b65fa (patch)
tree579a7c080390d29b1aa6f772559c0f1946228779 /test/lisp/emacs-lisp/derived-tests.el
parentf851e725b35d2ebd51b829059761a232d2ca1fbb (diff)
parentb3505e31d6ce4ea7c2cf1b01b8b7357b1f527bf1 (diff)
downloademacs-360d2d3a3328799ed8fea27bc7c13873f84b65fa.tar.gz
emacs-360d2d3a3328799ed8fea27bc7c13873f84b65fa.tar.bz2
emacs-360d2d3a3328799ed8fea27bc7c13873f84b65fa.zip
Merge remote-tracking branch 'origin/master' into feature/pgtk
Diffstat (limited to 'test/lisp/emacs-lisp/derived-tests.el')
-rw-r--r--test/lisp/emacs-lisp/derived-tests.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/derived-tests.el b/test/lisp/emacs-lisp/derived-tests.el
index 9c8e6c33b4c..2647b86826a 100644
--- a/test/lisp/emacs-lisp/derived-tests.el
+++ b/test/lisp/emacs-lisp/derived-tests.el
@@ -24,13 +24,13 @@
(define-derived-mode derived-tests--parent-mode prog-mode "P"
:after-hook
(let ((f (let ((x "S")) (lambda () x))))
- (insert (format "AFP=%s " (let ((x "D")) (funcall f)))))
+ (insert (format "AFP=%s " (let ((x "D")) x (funcall f)))))
(insert "PB "))
(define-derived-mode derived-tests--child-mode derived-tests--parent-mode "C"
:after-hook
(let ((f (let ((x "S")) (lambda () x))))
- (insert (format "AFC=%s " (let ((x "D")) (funcall f)))))
+ (insert (format "AFC=%s " (let ((x "D")) x (funcall f)))))
(insert "CB "))
(ert-deftest derived-tests-after-hook-lexical ()