Mercurial > hg > xemacs-beta

comparison lisp/gnus/nnmh.el @ 26:441bb1e64a06 r19-15b96

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b96
author cvs
date Mon, 13 Aug 2007 08:51:32 +0200
parents 4103f0995bd7
children ec9a17fef872
comparison
equal deleted inserted replaced
25:383a494979f8 26:441bb1e64a06
272 (and 272 (and
273 (nnmh-deletable-article-p group article) 273 (nnmh-deletable-article-p group article)
274 (nnmh-request-article article group server) 274 (nnmh-request-article article group server)
275 (save-excursion 275 (save-excursion
276 (set-buffer buf) 276 (set-buffer buf)
277 (erase-buffer)
277 (insert-buffer-substring nntp-server-buffer) 278 (insert-buffer-substring nntp-server-buffer)
278 (setq result (eval accept-form)) 279 (setq result (eval accept-form))
279 (kill-buffer (current-buffer)) 280 (kill-buffer (current-buffer))
280 result) 281 result)
281 (progn 282 (progn