diff options
| author | Akira Kyle <akira@akirakyle.com> | 2020-11-29 11:40:47 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-11-29 11:40:59 +0100 |
| commit | 9939c435c108b099d3362ecbfa1cba6cc0bbd8f9 (patch) | |
| tree | d2e5a52f86244976769d6d0900ee0afa24c5fa71 | |
| parent | 17fa17be3d93fc10f6ca91d738d5056b1b9f1f1e (diff) | |
| download | emacs-9939c435c108b099d3362ecbfa1cba6cc0bbd8f9.tar.gz | |
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).
| -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 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))) |