Mercurial > emacs
comparison lisp/gnus/nndraft.el @ 62943:11d53dd5abd9
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-345
Merge from gnus--rel--5.10
Patches applied:
* gnus--rel--5.10 (patch 77-78)
- Update from CVS
2005-05-31 Katsumi Yamaoka <yamaoka@jpl.org>
* lisp/gnus/gnus-art.el (article-display-x-face): Replace
process-kill-without-query by gnus-set-process-query-on-exit-flag.
* lisp/gnus/gnus-group.el: Bind gnus-cache-active-hashtb when compiling.
* lisp/gnus/gnus-util.el (gnus-set-process-query-on-exit-flag): Alias to
set-process-query-on-exit-flag or process-kill-without-query.
* lisp/gnus/html2text.el (html2text-fix-paragraphs): Use `while - re-search'
loop instead of replace-regexp.
* lisp/gnus/imap.el (imap-ssl-open): Use set-process-query-on-exit-flag
instead of process-kill-without-query if it is available.
* lisp/gnus/mm-util.el (mm-insert-file-contents): Bind find-file-hook
instead of find-file-hooks if it is available.
* lisp/gnus/mml1991.el: Bind pgg-default-user-id when compiling.
* lisp/gnus/mml2015.el: Bind pgg-default-user-id when compiling.
* lisp/gnus/nndraft.el (nndraft-request-associate-buffer): Use
write-contents-functions instead of write-contents-hooks if it is
available.
* lisp/gnus/nnheader.el (nnheader-find-file-noselect): Bind find-file-hook
instead of find-file-hooks if it is available.
* lisp/gnus/nntp.el (nntp-open-connection): Replace
process-kill-without-query by gnus-set-process-query-on-exit-flag.
(nntp-open-ssl-stream): Ditto.
(nntp-open-tls-stream): Ditto.
* lisp/gnus/pgg.el: Don't bind itimer vars; don't autoload itimer functions.
(pgg-run-at-time-1): New macro.
(pgg-run-at-time): Use it.
* lisp/gnus/starttls.el (starttls-set-process-query-on-exit-flag): Alias to
set-process-query-on-exit-flag or process-kill-without-query.
(starttls-open-stream-gnutls): Use it instead of
process-kill-without-query.
(starttls-open-stream): Ditto.
2005-05-31 Simon Josefsson <jas@extundo.com>
* lisp/gnus/imap.el (imap-ssl-open): Use imap-process-connection-type,
instead of hard coding to nil.
2005-05-31 Kevin Greiner <kgreiner@xpediantsolutions.com>
* lisp/gnus/gnus-group.el (): Require gnus-sum and autoload functions to
resolve warnings when gnus-group.el compiled alone.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Wed, 01 Jun 2005 05:07:06 +0000 |
parents | 88db2adda4b7 |
children | 18a818a2ee7c 01137c1fdbe9 |
comparison
equal
deleted
inserted
replaced
62942:eed5b72c957d | 62943:11d53dd5abd9 |
---|---|
1 ;;; nndraft.el --- draft article access for Gnus | 1 ;;; nndraft.el --- draft article access for Gnus |
2 | 2 |
3 ;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2003 | 3 ;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2003, 2005 |
4 ;; Free Software Foundation, Inc. | 4 ;; Free Software Foundation, Inc. |
5 | 5 |
6 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> | 6 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> |
7 ;; Keywords: news | 7 ;; Keywords: news |
8 | 8 |
172 group (nnoo-current-server 'nndraft) t 'noinsert) | 172 group (nnoo-current-server 'nndraft) t 'noinsert) |
173 file (nndraft-article-filename article))) | 173 file (nndraft-article-filename article))) |
174 (setq buffer-file-name (expand-file-name file) | 174 (setq buffer-file-name (expand-file-name file) |
175 buffer-auto-save-file-name (make-auto-save-file-name)) | 175 buffer-auto-save-file-name (make-auto-save-file-name)) |
176 (clear-visited-file-modtime) | 176 (clear-visited-file-modtime) |
177 (make-local-variable 'write-contents-hooks) | 177 (let ((hook (if (boundp 'write-contents-functions) |
178 (push 'nndraft-generate-headers write-contents-hooks) | 178 'write-contents-functions |
179 'write-contents-hooks))) | |
180 (gnus-make-local-hook hook) | |
181 (add-hook hook 'nndraft-generate-headers nil t)) | |
179 article)) | 182 article)) |
180 | 183 |
181 (deffoo nndraft-request-group (group &optional server dont-check) | 184 (deffoo nndraft-request-group (group &optional server dont-check) |
182 (nndraft-possibly-change-group group) | 185 (nndraft-possibly-change-group group) |
183 (unless dont-check | 186 (unless dont-check |