Mercurial > emacs
comparison lisp/gnus/nnfolder.el @ 58223:d6cec97fa4c1
(nnfolder-save-marks): Add missing format field in call to `error'.
author | Luc Teirlinck <teirllm@auburn.edu> |
---|---|
date | Sun, 14 Nov 2004 23:07:12 +0000 |
parents | cee5a9d8ee71 |
children | 9bdd97960431 b637c617432f |
comparison
equal
deleted
inserted
replaced
58222:dd462aabc959 | 58223:d6cec97fa4c1 |
---|---|
1238 (gnus-sethash file | 1238 (gnus-sethash file |
1239 (nth 5 (file-attributes file)) | 1239 (nth 5 (file-attributes file)) |
1240 nnfolder-marks-modtime)) | 1240 nnfolder-marks-modtime)) |
1241 (error (or (gnus-yes-or-no-p | 1241 (error (or (gnus-yes-or-no-p |
1242 (format "Could not write to %s (%s). Continue? " file err)) | 1242 (format "Could not write to %s (%s). Continue? " file err)) |
1243 (error "Cannot write to %s (%s)" err)))))) | 1243 (error "Cannot write to %s (%s)" file err)))))) |
1244 | 1244 |
1245 (defun nnfolder-open-marks (group server) | 1245 (defun nnfolder-open-marks (group server) |
1246 (let ((file (nnfolder-group-marks-pathname group))) | 1246 (let ((file (nnfolder-group-marks-pathname group))) |
1247 (if (file-exists-p file) | 1247 (if (file-exists-p file) |
1248 (condition-case err | 1248 (condition-case err |