diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 34 | ||||
| -rw-r--r-- | lisp/gnus/gnus-util.el | 8 |
2 files changed, 34 insertions, 8 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 9e6e8e50fde..1542699c01f 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,37 @@ | |||
| 1 | 2000-10-26 ShengHuo ZHU <zsh@cs.rochester.edu> | ||
| 2 | |||
| 3 | * gnus-ems.el: Remove gnus-xemacs. Autoload smiley. | ||
| 4 | (gnus-kill-all-overlays): Move here. | ||
| 5 | |||
| 6 | * gnus-util.el (gnus-kill-all-overlays): Move out. | ||
| 7 | |||
| 8 | 2000-10-26 Dave Love <fx@gnu.org> | ||
| 9 | |||
| 10 | * mail-source.el: Require imap when compiling and defvar | ||
| 11 | display-time-mail-function. Require mm-util. | ||
| 12 | (nnheader-cancel-timer): Autoload. | ||
| 13 | (mail-source-imap-authenticators, mail-source-imap-streams): New | ||
| 14 | variables. | ||
| 15 | (mail-sources): Use them. | ||
| 16 | (defvar): Use rmail-spool-directory unconditionally. | ||
| 17 | |||
| 18 | 2000-10-26 Dirk Meyer <dischi@tzi.de> | ||
| 19 | |||
| 20 | * gnus-demon.el (gnus-demon-time-to-step): theHour was set to | ||
| 21 | seconds instead of hour. | ||
| 22 | |||
| 23 | 2000-10-26 Per Abrahamsen <abraham@dina.kvl.dk> | ||
| 24 | |||
| 25 | * mail-source.el (mail-sources): Better `:type'. | ||
| 26 | |||
| 27 | 2000-10-26 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> | ||
| 28 | |||
| 29 | * mail-source.el (mail-source-keyword-map): Use | ||
| 30 | `rmail-spool-directory' as a default directory for the `file' | ||
| 31 | source, if the variable is defined. Fall back to hardcoded | ||
| 32 | "/usr/spool/mail/", as before. Suggestion by Steven E. Harris | ||
| 33 | <seh@speakeasy.org>. | ||
| 34 | |||
| 1 | 2000-10-25 Jason Rumney <jasonr@gnus.org> | 35 | 2000-10-25 Jason Rumney <jasonr@gnus.org> |
| 2 | 36 | ||
| 3 | * gnus-art.el (gnus-signature-face): Use italic on any frame that | 37 | * gnus-art.el (gnus-signature-face): Use italic on any frame that |
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index 72e4d031e1c..df776a7c1f1 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el | |||
| @@ -451,14 +451,6 @@ If N, return the Nth ancestor instead." | |||
| 451 | (file-name-nondirectory file)))) | 451 | (file-name-nondirectory file)))) |
| 452 | (copy-file file to)) | 452 | (copy-file file to)) |
| 453 | 453 | ||
| 454 | (defun gnus-kill-all-overlays () | ||
| 455 | "Delete all overlays in the current buffer." | ||
| 456 | (let* ((overlayss (overlay-lists)) | ||
| 457 | (buffer-read-only nil) | ||
| 458 | (overlays (delq nil (nconc (car overlayss) (cdr overlayss))))) | ||
| 459 | (while overlays | ||
| 460 | (delete-overlay (pop overlays))))) | ||
| 461 | |||
| 462 | (defvar gnus-work-buffer " *gnus work*") | 454 | (defvar gnus-work-buffer " *gnus work*") |
| 463 | 455 | ||
| 464 | (defun gnus-set-work-buffer () | 456 | (defun gnus-set-work-buffer () |