mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-02 20:16:25 +00:00
Code Issues Releases Activity

2000-10-08 10:59:13 ShengHuo ZHU <zsh@cs.rochester.edu>

Browse Source 
* gnus-util.el (gnus-kill-all-overlays): Move out.
This commit is contained in:
Dave Love 2000-10-26 17:42:44 +00:00
parent 06c43cdf99
commit fc7bf2631f
2 changed files with 34 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
lisp/gnus/ChangeLog
View File

@ -1,3 +1,37 @@
2000-10-26 ShengHuo ZHU <zsh@cs.rochester.edu>
* gnus-ems.el: Remove gnus-xemacs. Autoload smiley.
(gnus-kill-all-overlays): Move here.
* gnus-util.el (gnus-kill-all-overlays): Move out.
2000-10-26 Dave Love <fx@gnu.org>
* mail-source.el: Require imap when compiling and defvar
display-time-mail-function. Require mm-util.
(nnheader-cancel-timer): Autoload.
(mail-source-imap-authenticators, mail-source-imap-streams): New
variables.
(mail-sources): Use them.
(defvar): Use rmail-spool-directory unconditionally.
2000-10-26 Dirk Meyer <dischi@tzi.de>
* gnus-demon.el (gnus-demon-time-to-step): theHour was set to
seconds instead of hour.
2000-10-26 Per Abrahamsen <abraham@dina.kvl.dk>
* mail-source.el (mail-sources): Better `:type'.
2000-10-26 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
* mail-source.el (mail-source-keyword-map): Use
`rmail-spool-directory' as a default directory for the `file'
source, if the variable is defined. Fall back to hardcoded
"/usr/spool/mail/", as before. Suggestion by Steven E. Harris
<seh@speakeasy.org>.
2000-10-25 Jason Rumney <jasonr@gnus.org>
* gnus-art.el (gnus-signature-face): Use italic on any frame that

8
lisp/gnus/gnus-util.el
View File

@ -451,14 +451,6 @@ If N, return the Nth ancestor instead."
(file-name-nondirectory file))))
(copy-file file to))
(defun gnus-kill-all-overlays ()
"Delete all overlays in the current buffer."
(let* ((overlayss (overlay-lists))
(buffer-read-only nil)
(overlays (delq nil (nconc (car overlayss) (cdr overlayss)))))
(while overlays
(delete-overlay (pop overlays)))))
(defvar gnus-work-buffer " *gnus work*")
(defun gnus-set-work-buffer ()