Mercurial > hg > xemacs-beta
comparison lisp/gnus/nnml.el @ 100:4be1180a9e89 r20-1b2
Import from CVS: tag r20-1b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:15:11 +0200 |
parents | 0d2f883870bc |
children | cf808b4c4290 |
comparison
equal
deleted
inserted
replaced
99:2d83cbd90d8d | 100:4be1180a9e89 |
---|---|
157 server nnml-directory) | 157 server nnml-directory) |
158 t))) | 158 t))) |
159 | 159 |
160 (defun nnml-request-regenerate (server) | 160 (defun nnml-request-regenerate (server) |
161 (nnml-possibly-change-directory nil server) | 161 (nnml-possibly-change-directory nil server) |
162 (nnml-generate-nov-databases)) | 162 (nnml-generate-nov-databases) |
163 t) | |
163 | 164 |
164 (deffoo nnml-request-article (id &optional group server buffer) | 165 (deffoo nnml-request-article (id &optional group server buffer) |
165 (nnml-possibly-change-directory group server) | 166 (nnml-possibly-change-directory group server) |
166 (let* ((nntp-server-buffer (or buffer nntp-server-buffer)) | 167 (let* ((nntp-server-buffer (or buffer nntp-server-buffer)) |
167 path gpath group-num) | 168 path gpath group-num) |