From: yamaoka <yamaoka>
Date: Fri, 9 Mar 2001 07:43:34 +0000 (+0000)
Subject: Synch with Oort Gnus.
X-Git-Tag: t-gnus-6_15_0-10-quimby~18
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=30d1e7f9343ac36b671d3173f07e8158a5f0a01a;p=elisp%2Fgnus.git-

Synch with Oort Gnus.
---

diff --git a/lisp/nnrss.el b/lisp/nnrss.el
index ee5df1e..e8f3332 100644
--- a/lisp/nnrss.el
+++ b/lisp/nnrss.el
@@ -1,5 +1,5 @@
 ;;; nnrss.el --- interfacing with RSS
-;; Copyright (C) 2001 ShengHuo Zhu
+;; Copyright (C) 2001  Free Software Foundation, Inc.
 
 ;; Author: Shenghuo Zhu <zsh@cs.rochester.edu>
 ;; Keywords: RSS
@@ -208,7 +208,10 @@
   (setq nnrss-server-data
 	(delq (assoc group nnrss-server-data) nnrss-server-data))
   (nnrss-save-server-data server)
-  (let ((file (expand-file-name (concat group ".el") nnrss-directory)))
+  (let ((file (expand-file-name (concat group (and server
+						   (not (equal server ""))
+						   "-")
+					server ".el") nnrss-directory)))
     (delete-file file))
   t)