diff options
| author | Nick Drozd <nicholasdrozd@gmail.com> | 2019-02-02 12:50:03 -0600 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2019-02-08 09:40:31 +0200 |
| commit | 46095a7dcb5fd6e0b79582bd14aa87f2d04f4a65 (patch) | |
| tree | bb608a33851316753540e64e67c455f8dbd96f40 /lisp | |
| parent | 3b60a0add71f7b5bdd350d189e5d05c19b27c089 (diff) | |
| download | emacs-46095a7dcb5fd6e0b79582bd14aa87f2d04f4a65.tar.gz | |
Fix downloading of URLs that end in a slash
* lisp/net/eww.el (eww-download-callback): Fix download URL
file name. Previously this wasn't handling download URLs
correctly, resulting in all downloaded pages being named
"!", "!(1)", etc. (Bug#34291)
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/net/eww.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index cf586e2d56f..1cc4557ce1a 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el @@ -1526,7 +1526,7 @@ Differences in #targets are ignored." (defun eww-download-callback (status url) (unless (plist-get status :error) (let* ((obj (url-generic-parse-url url)) - (path (car (url-path-and-query obj))) + (path (directory-file-name (car (url-path-and-query obj)))) (file (eww-make-unique-file-name (eww-decode-url-file-name (file-name-nondirectory path)) eww-download-directory))) |