[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
nnml.el and nnfolder.el
From: |
Luc Teirlinck |
Subject: |
nnml.el and nnfolder.el |
Date: |
Sun, 14 Nov 2004 15:30:13 -0600 (CST) |
I believe that the following two compiler warnings in the `make
bootstrap' output seem real:
In nnfolder-save-marks: nnfolder.el:1243:19:Warning: `error' called
with 1 args to fill 2 format field(s)
and:
nnml.el:987:19:Warning: `error' called with 1 args to fill 2
format field(s)
They probably resulted from typos. I know nothing about those two
files and do not remember what procedure to follow for bug fixes to
Gnus, but I would guess that the following were really intended:
===File ~/nnfolder-diff=====================================
*** nnfolder.el 29 Sep 2004 07:46:22 -0500 1.18
--- nnfolder.el 14 Nov 2004 14:51:13 -0600
***************
*** 1240,1246 ****
nnfolder-marks-modtime))
(error (or (gnus-yes-or-no-p
(format "Could not write to %s (%s). Continue? " file err))
! (error "Cannot write to %s (%s)" err))))))
(defun nnfolder-open-marks (group server)
(let ((file (nnfolder-group-marks-pathname group)))
--- 1240,1246 ----
nnfolder-marks-modtime))
(error (or (gnus-yes-or-no-p
(format "Could not write to %s (%s). Continue? " file err))
! (error "Cannot write to %s (%s)" file err))))))
(defun nnfolder-open-marks (group server)
(let ((file (nnfolder-group-marks-pathname group)))
============================================================
===File ~/nnml-diff=========================================
*** nnml.el 29 Sep 2004 07:46:22 -0500 1.13
--- nnml.el 14 Nov 2004 15:02:39 -0600
***************
*** 984,990 ****
nnml-marks-modtime))
(error (or (gnus-yes-or-no-p
(format "Could not write to %s (%s). Continue? " file err))
! (error "Cannot write to %s (%s)" err))))))
(defun nnml-open-marks (group server)
(let ((file (expand-file-name
--- 984,990 ----
nnml-marks-modtime))
(error (or (gnus-yes-or-no-p
(format "Could not write to %s (%s). Continue? " file err))
! (error "Cannot write to %s (%s)" file err))))))
(defun nnml-open-marks (group server)
(let ((file (expand-file-name
============================================================
- nnml.el and nnfolder.el,
Luc Teirlinck <=