(smtpmail-via-smtp): Parse out the first word

[gnu-emacs] / lisp / nnmh.el

diff --git a/lisp/nnmh.el b/lisp/nnmh.el
index bebc050effec999ec3bd0781bed062e3e99cac06..cc9adab8996a4436d2559cd3db8bc35a3d0defac 100644 (file)
--- a/lisp/nnmh.el
+++ b/lisp/nnmh.el
@@ -157,6 +157,8 @@
        (nnheader-report 'nnmh "Selected group %s" group)
        t)
        (t
+       ;; Re-scan the directory if it's on a foreign system.
+       (nnheader-re-read-dir pathname)
        (setq dir 
              (sort
               (mapcar (lambda (name) (string-to-int name))