* test/lisp/url/url-file-tests.el (url-file): Use file:///, not file://.

This commit is contained in:
Juanma Barranquero 2019-06-15 05:29:03 +02:00
parent 0c5f6c6c63
commit 7a8f22b004

View file

@ -33,11 +33,11 @@
"Directory for url-file test files.")
(ert-deftest url-file ()
"Test reading file via file:// URL."
"Test reading file via file:/// URL."
(let ((file (expand-file-name "file.txt" url-file-tests-data-directory)))
(should (equal
(with-current-buffer
(url-file (url-generic-parse-url (concat "file://" file))
(url-file (url-generic-parse-url (concat "file:///" file))
#'ignore nil)
(prog1 (buffer-substring (point) (point-max))
(kill-buffer)))