Add unit test for Bug#26378

* test/lisp/vc/ediff-diff-tests.el
(ediff-diff-tests--ediff-exec-process--nil): New unit test.
This commit is contained in:
Philipp Stephani 2017-04-08 16:55:56 +02:00
parent 4fbfd7ad53
commit 5ea696fd24

View file

@ -41,4 +41,15 @@
(should (equal call-process-args
`(("diff" nil ,(current-buffer) nil "/a" "/b")))))))
(ert-deftest ediff-diff-tests--ediff-exec-process--nil ()
"Check that Bug#26378 is fixed."
(cl-letf* ((call-process-args ())
((symbol-function #'call-process)
(lambda (&rest args) (push args call-process-args) 0)))
(with-temp-buffer
(ediff-exec-process "diff" (current-buffer) :synchronous ""
"foo" nil "")
(should (equal call-process-args
`(("diff" nil ,(current-buffer) nil "foo")))))))
;;; ediff-diff-tests.el ends here