Mercurial > hg > xemacs-beta
diff lisp/gnus/nnmbox.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 | 360340f9fd5f |
line wrap: on
line diff
--- a/lisp/gnus/nnmbox.el Mon Aug 13 09:13:58 2007 +0200 +++ b/lisp/gnus/nnmbox.el Mon Aug 13 09:15:11 2007 +0200 @@ -194,7 +194,8 @@ (save-excursion (set-buffer nnmbox-mbox-buffer) (save-buffer))) - nnmbox-mbox-file group + (file-name-directory nnmbox-mbox-file) + group (lambda () (save-excursion (let ((in-buf (current-buffer)))