diff options
| author | Juanma Barranquero | 2019-06-15 05:29:03 +0200 |
|---|---|---|
| committer | Juanma Barranquero | 2019-06-15 05:29:03 +0200 |
| commit | 7a8f22b00484e2c1a28b48767b8562c6b6e89e06 (patch) | |
| tree | ec8ec2c69937427eae7f5d8c189d42842c99c13c | |
| parent | 0c5f6c6c6383c7be7fe08ae76c546d4b95146c69 (diff) | |
| download | emacs-7a8f22b00484e2c1a28b48767b8562c6b6e89e06.tar.gz emacs-7a8f22b00484e2c1a28b48767b8562c6b6e89e06.zip | |
* test/lisp/url/url-file-tests.el (url-file): Use file:///, not file://.
| -rw-r--r-- | test/lisp/url/url-file-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/url/url-file-tests.el b/test/lisp/url/url-file-tests.el index 45af1bba95d..84b7c3a70b0 100644 --- a/test/lisp/url/url-file-tests.el +++ b/test/lisp/url/url-file-tests.el | |||
| @@ -33,11 +33,11 @@ | |||
| 33 | "Directory for url-file test files.") | 33 | "Directory for url-file test files.") |
| 34 | 34 | ||
| 35 | (ert-deftest url-file () | 35 | (ert-deftest url-file () |
| 36 | "Test reading file via file:// URL." | 36 | "Test reading file via file:/// URL." |
| 37 | (let ((file (expand-file-name "file.txt" url-file-tests-data-directory))) | 37 | (let ((file (expand-file-name "file.txt" url-file-tests-data-directory))) |
| 38 | (should (equal | 38 | (should (equal |
| 39 | (with-current-buffer | 39 | (with-current-buffer |
| 40 | (url-file (url-generic-parse-url (concat "file://" file)) | 40 | (url-file (url-generic-parse-url (concat "file:///" file)) |
| 41 | #'ignore nil) | 41 | #'ignore nil) |
| 42 | (prog1 (buffer-substring (point) (point-max)) | 42 | (prog1 (buffer-substring (point) (point-max)) |
| 43 | (kill-buffer))) | 43 | (kill-buffer))) |