Mercurial > emacs

comparison lisp/gnus/nnml.el @ 58222:dd462aabc959

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(nnml-save-marks): Add missing format field in call to `error'.
author Luc Teirlinck <teirllm@auburn.edu>
date Sun, 14 Nov 2004 23:03:04 +0000
parents cee5a9d8ee71
children 88db2adda4b7 b637c617432f
comparison
equal deleted inserted replaced
58221:410d0a597e9d 58222:dd462aabc959
982 (gnus-sethash file 982 (gnus-sethash file
983 (nth 5 (file-attributes file)) 983 (nth 5 (file-attributes file))
984 nnml-marks-modtime)) 984 nnml-marks-modtime))
985 (error (or (gnus-yes-or-no-p 985 (error (or (gnus-yes-or-no-p
986 (format "Could not write to %s (%s). Continue? " file err)) 986 (format "Could not write to %s (%s). Continue? " file err))
987 (error "Cannot write to %s (%s)" err)))))) 987 (error "Cannot write to %s (%s)" file err))))))
988 988
989 (defun nnml-open-marks (group server) 989 (defun nnml-open-marks (group server)
990 (let ((file (expand-file-name 990 (let ((file (expand-file-name
991 nnml-marks-file-name 991 nnml-marks-file-name
992 (nnmail-group-pathname group nnml-directory)))) 992 (nnmail-group-pathname group nnml-directory))))