diff options
Diffstat (limited to 'lisp/gnus/nnmh.el')
-rw-r--r-- | lisp/gnus/nnmh.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/gnus/nnmh.el b/lisp/gnus/nnmh.el index f1938586141..48c0ea2e139 100644 --- a/lisp/gnus/nnmh.el +++ b/lisp/gnus/nnmh.el @@ -190,11 +190,9 @@ (deffoo nnmh-request-list (&optional server dir) (nnheader-insert "") - (let (;; 1997/8/14 by MORIOKA Tomohiko - ;; for XEmacs/mule. - (pathname-coding-system 'binary) + (let ((pathname-coding-system 'binary) (nnmh-toplev - (or dir (file-truename (file-name-as-directory nnmh-directory))))) + (file-truename (or dir (file-name-as-directory nnmh-directory))))) (nnmh-request-list-1 nnmh-toplev)) (setq nnmh-group-alist (nnmail-get-active)) t) |