From: Nick Drozd <nicholasdrozd@gmail.com>
Date: Sat, 2 Feb 2019 18:50:03 +0000 (-0600)
Subject: Fix downloading of URLs that end in a slash
X-Git-Tag: emacs-26.1.92~26
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=46095a7dcb5fd6e0b79582bd14aa87f2d04f4a65;p=emacs.git

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)
---

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)))