From: Akira Kyle <akira@akirakyle.com>
Date: Sun, 29 Nov 2020 10:40:47 +0000 (+0100)
Subject: Return the correct suffix in eww-make-unique-file-name
X-Git-Tag: emacs-27.1.90~28
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9939c435c108b099d3362ecbfa1cba6cc0bbd8f9;p=emacs.git

Return the correct suffix in eww-make-unique-file-name

* lisp/net/eww.el (eww-make-unique-file-name): Return the correct
suffix (bug#44936).
---

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index d6f850ca3ba..13b90588651 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -1661,7 +1661,7 @@ Use link at point if there is one, else the current page's URL."
         (suffix ""))
     (when (string-match "\\`\\(.*\\)\\([.][^.]+\\)" file)
       (setq stem (match-string 1 file)
-            suffix (match-string 2)))
+            suffix (match-string 2 file)))
     (while (file-exists-p (expand-file-name file directory))
       (setq file (format "%s(%d)%s" stem count suffix))
       (setq count (1+ count)))