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 cf586e2d56f3280870eab16004a87d3a6ef6b4c6..1cc4557ce1a53a559b1988d9bb5d4656a1cf7d2d 100644 (file)
--- 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)))