Commit fcf5d894 authored by Sam Steingold's avatar Sam Steingold

gnus-score-file-name: Do not append empty suffix.

parent 49a42fbd
......@@ -2961,8 +2961,8 @@ The list is determined from the variable `gnus-score-file-alist'."
(expand-file-name suffix gnus-kill-files-directory))
((gnus-use-long-file-name 'not-score)
;; Append ".SCORE" to newsgroup name.
(expand-file-name (concat (gnus-newsgroup-savable-name newsgroup)
"." suffix)
(expand-file-name (let ((name (gnus-newsgroup-savable-name newsgroup)))
(if (string= "" suffix) name (concat name "." suffix)))
gnus-kill-files-directory))
(t
;; Place "SCORE" under the hierarchical directory.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment