aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/gnus/gnus-score.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-score.el b/lisp/gnus/gnus-score.el
index 2defa76f50d..19cf799a2f8 100644
--- a/lisp/gnus/gnus-score.el
+++ b/lisp/gnus/gnus-score.el
@@ -2961,8 +2961,8 @@ The list is determined from the variable `gnus-score-file-alist'."
2961 (expand-file-name suffix gnus-kill-files-directory)) 2961 (expand-file-name suffix gnus-kill-files-directory))
2962 ((gnus-use-long-file-name 'not-score) 2962 ((gnus-use-long-file-name 'not-score)
2963 ;; Append ".SCORE" to newsgroup name. 2963 ;; Append ".SCORE" to newsgroup name.
2964 (expand-file-name (concat (gnus-newsgroup-savable-name newsgroup) 2964 (expand-file-name (let ((name (gnus-newsgroup-savable-name newsgroup)))
2965 "." suffix) 2965 (if (string= "" suffix) name (concat name "." suffix)))
2966 gnus-kill-files-directory)) 2966 gnus-kill-files-directory))
2967 (t 2967 (t
2968 ;; Place "SCORE" under the hierarchical directory. 2968 ;; Place "SCORE" under the hierarchical directory.