procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add unit test for Bug#30005.

Browse source 
* test/src/callint-tests.el (call-interactively/embedded-nulls): New
unit test.
This commit is contained in:
Philipp Stephani 2018-01-23 23:39:18 +01:00
parent 18139139c9
commit 4c998b4e4f
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
test/src/callint-tests.el
View file

@ -35,4 +35,12 @@
(cdr data)
'("Invalid control letter `\u00FF' (#o377, #x00ff) in interactive calling string")))))
(ert-deftest call-interactively/embedded-nulls ()
"Check that Bug#30005 is fixed."
(should (equal (let ((unread-command-events '(?a ?b)))
(call-interactively (lambda (a b)
(interactive "ka\0a: \nkb: ")
(list a b))))
'("a" "b"))))
;;; callint-tests.el ends here