* nntp.el (nntp-request-set-mark, nntp-request-update-info): Call
nntp-possibly-create-directory, not nntp-possibly-change-group.
+ (nntp-marks-changed-p): New arg SERVER.
+ (nntp-request-update-info): Adjust caller.
2004-05-14 Kai Grossjohann <kai@emptydomain.de>
(deffoo nntp-request-update-info (group info &optional server)
(nntp-possibly-create-directory group server)
- (when (and (not nntp-marks-is-evil) (nntp-marks-changed-p group))
+ (when (and (not nntp-marks-is-evil) (nntp-marks-changed-p group server))
(nnheader-message 8 "Updating marks for %s..." group)
(nntp-open-marks group server)
;; Update info using `nntp-marks'.
(make-directory (directory-file-name dir) t)
(nnheader-message 5 "Creating nntp marks directory %s" dir))))
-(defun nntp-marks-changed-p (group)
+(defun nntp-marks-changed-p (group server)
(let ((file (expand-file-name
nntp-marks-file-name
(nnmail-group-pathname