diff options
| author | Glenn Morris | 2019-06-15 09:50:33 -0700 |
|---|---|---|
| committer | Glenn Morris | 2019-06-15 09:50:33 -0700 |
| commit | 30e3e58c1b939376a984a19dcbfbd02bcc0b478a (patch) | |
| tree | 8e293338a3ed4551a1c41f5f07e6b673a24711b6 /test | |
| parent | 64366826c7679bad16c0a084f486b333ebd130b6 (diff) | |
| parent | 7a8f22b00484e2c1a28b48767b8562c6b6e89e06 (diff) | |
| download | emacs-30e3e58c1b939376a984a19dcbfbd02bcc0b478a.tar.gz emacs-30e3e58c1b939376a984a19dcbfbd02bcc0b478a.zip | |
Merge from origin/emacs-26
7a8f22b * test/lisp/url/url-file-tests.el (url-file): Use file:///, n...
0c5f6c6 Fix doc of srecompile-compile-split-code (Bug#36200)
Diffstat (limited to 'test')
| -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))) |