diff options
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/ChangeLog | 22 | ||||
| -rw-r--r-- | lisp/gnus/gnus-art.el | 6 | ||||
| -rw-r--r-- | lisp/gnus/gnus-diary.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/html2text.el | 4 | ||||
| -rw-r--r-- | lisp/gnus/nndiary.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/nnsoup.el | 2 |
6 files changed, 30 insertions, 8 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index fd9de602fb0..77a8b32333b 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,7 +1,23 @@ +2006-11-03 Juanma Barranquero <lekktu@gmail.com> + + * gnus-diary.el (gnus-diary-delay-format-function): + * nndiary.el (nndiary-reminders): + * nnsoup.el (nnsoup-always-save): Use "non-nil" in docstrings. + +2006-11-01 Reiner Steib <Reiner.Steib@gmx.de> + + * gnus-art.el (article-hide-boring-headers): Fetch date from + gnus-original-article-buffer to avoid problems with localized date + strings. + +2006-10-30 Katsumi Yamaoka <yamaoka@jpl.org> + + * html2text.el (html2text-format-tags): Avoid infloop on open tags. + 2006-10-29 Reiner Steib <Reiner.Steib@gmx.de> - * mm-util.el (mm-codepage-iso-8859-list, mm-codepage-ibm-list): New - variables. + * mm-util.el (mm-codepage-iso-8859-list, mm-codepage-ibm-list): + New variables. (mm-setup-codepage-iso-8859, mm-setup-codepage-ibm): New functions. (mm-charset-synonym-alist): Move some entries to mm-codepage-iso-8859-list. @@ -610,7 +626,7 @@ (rfc2231-encode-string): Be sure to work on multibyte buffer at first, and after mm-encode-body, change the buffer to unibyte. -2006-03-21 Daniel Pittman <daniel@rimspace.net> +2006-03-21 Daniel Pittman <daniel@rimspace.net> * nnimap.el (nnimap-request-update-info-internal): Optimize. Don't `gnus-uncompress-range' to avoid excessive memory usage. diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index ecee7ff6847..bc7f27c97c8 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el @@ -1917,7 +1917,11 @@ always hide." 'string<)))) (gnus-article-hide-header "reply-to"))))) ((eq elem 'date) - (let ((date (message-fetch-field "date"))) + (let ((date (with-current-buffer gnus-original-article-buffer + ;; If date in `gnus-article-buffer' is localized + ;; (`gnus-treat-date-user-defined'), + ;; `days-between' might fail. + (message-fetch-field "date")))) (when (and date (< (days-between (current-time-string) date) 4)) diff --git a/lisp/gnus/gnus-diary.el b/lisp/gnus/gnus-diary.el index e4834131aa7..bc2f096fd70 100644 --- a/lisp/gnus/gnus-diary.el +++ b/lisp/gnus/gnus-diary.el @@ -121,7 +121,7 @@ Please refer to `format-time-string' for information on possible values." (defcustom gnus-diary-delay-format-function 'gnus-diary-delay-format-english "*Function called to format a diary delay string. -It is passed two arguments. The first one is non nil if the delay is in +It is passed two arguments. The first one is non-nil if the delay is in the past. The second one is of the form ((NUM . UNIT) ...) where NUM is an integer and UNIT is one of 'year 'month 'week 'day 'hour or 'minute. It should return strings like \"In 2 months, 3 weeks\", \"3 hours, diff --git a/lisp/gnus/html2text.el b/lisp/gnus/html2text.el index 68934c909e9..08044225ab4 100644 --- a/lisp/gnus/html2text.el +++ b/lisp/gnus/html2text.el @@ -423,7 +423,9 @@ See the documentation for that variable." (p3) (p4)) (search-backward "<" (point-min) t) (setq p1 (point)) - (re-search-forward (format "</%s>" tag) (point-max) t) + (unless (search-forward (format "</%s>" tag) (point-max) t) + (goto-char p2) + (insert (format "</%s>" tag))) (setq p4 (point)) (search-backward "</" (point-min) t) (setq p3 (point)) diff --git a/lisp/gnus/nndiary.el b/lisp/gnus/nndiary.el index 0c83a2d5124..a569314d6d7 100644 --- a/lisp/gnus/nndiary.el +++ b/lisp/gnus/nndiary.el @@ -263,7 +263,7 @@ not 'century, sorry). NOTE: the units of measure actually express dates, not durations: if you use 'week, messages will pop up on Sundays at 00:00 (or Mondays if -`nndiary-week-starts-on-monday' is non nil) and *not* 7 days before the +`nndiary-week-starts-on-monday' is non-nil) and *not* 7 days before the appointement, if you use 'month, messages will pop up on the first day of each months, at 00:00 and so on. diff --git a/lisp/gnus/nnsoup.el b/lisp/gnus/nnsoup.el index 9dc429ec135..e520121a266 100644 --- a/lisp/gnus/nnsoup.el +++ b/lisp/gnus/nnsoup.el @@ -75,7 +75,7 @@ The SOUP packet file name will be inserted at the %s.") "*Regular expression matching SOUP packets in `nnsoup-packet-directory'.") (defvoo nnsoup-always-save t - "If non nil commit the reply buffer on each message send. + "If non-nil commit the reply buffer on each message send. This is necessary if using message mode outside Gnus with nnsoup as a backend for the messages.") |