Mercurial > emacs
changeset 110202:6a6bf4529cad
(nnmh-request-list-1): Bind `file'.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Sun, 05 Sep 2010 04:09:07 +0000 |
| parents | 46435634bd67 |
| children | 1ef614366598 |
| files | lisp/gnus/ChangeLog lisp/gnus/nnmh.el |
| diffstat | 2 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Sun Sep 05 04:01:41 2010 +0000 +++ b/lisp/gnus/ChangeLog Sun Sep 05 04:09:07 2010 +0000 @@ -1,5 +1,7 @@ 2010-09-05 Katsumi Yamaoka <yamaoka@jpl.org> + * nnmh.el (nnmh-request-list-1): Bind `file'. + * pop3.el (pop3-set-process-query-on-exit-flag): New function that's an alias to set-process-query-on-exit-flag or process-kill-without-query. (pop3-open-server): Use it.
--- a/lisp/gnus/nnmh.el Sun Sep 05 04:01:41 2010 +0000 +++ b/lisp/gnus/nnmh.el Sun Sep 05 04:09:07 2010 +0000 @@ -209,7 +209,7 @@ ;; Recurse down all directories. (let ((files (nnheader-directory-files dir t nil t)) (max 0) - min rdir num subdirectoriesp) + min rdir num subdirectoriesp file) ;; Recurse down directories. (setq subdirectoriesp (> (nth 1 (file-attributes dir)) 2)) (dolist (rdir files)