mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-02 13:41:30 -08:00
Code Issues Projects Releases Wiki Activity

Add a couple more shell-tests-split-string tests

Browse source
This commit is contained in:
Lars Ingebrigtsen 2021-07-16 01:42:49 +02:00
parent 653848a277
commit 1cd278bfcd
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
test/lisp/shell-tests.el
View file

@ -54,6 +54,10 @@
'("ls" "/tmp/foo bar")))
(should (equal (split-string-shell-command "ls /tmp/'foo bar'")
'("ls" "/tmp/foo bar")))
(should (equal (split-string-shell-command "ls /tmp/'foo\"bar'")
'("ls" "/tmp/foo\"bar")))
(should (equal (split-string-shell-command "ls /tmp/\"foo''bar\"")
'("ls" "/tmp/foo''bar")))
(should (equal (split-string-shell-command "ls /tmp/'foo\\ bar'")
'("ls" "/tmp/foo\\ bar")))
(unless (memq system-type '(windows-nt ms-dos))