(nnmh-request-list-1): fix.

diff --git a/lisp/nnmh.el b/lisp/nnmh.el
index 900eede..d638c96 100644 (file)
--- a/lisp/nnmh.el
+++ b/lisp/nnmh.el
@@ -206,8 +206,8 @@
       (when (and (not (member (file-name-nondirectory rdir) '("." "..")))
                 (file-directory-p rdir)
                 (file-readable-p rdir)
-                (equal (file-truename rdir)
-                       (file-truename dir)))
+                (not (string= (file-truename rdir)
+                              (file-truename dir))))
        (nnmh-request-list-1 rdir))))
   ;; For each directory, generate an active file line.
   (unless (string= (expand-file-name nnmh-toplev) dir)