[Emacs-diffs] emacs/lisp/gnus nnmaildir.el [EMACS_23_1_RC]

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_23_1_RC
Changes by:     Chong Yidong <cyd>      09/07/18 17:17:21

Modified files:
        lisp/gnus      : nnmaildir.el 

Log message:
        Revert last change in the branch.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/gnus/nnmaildir.el?cvsroot=emacs&only_with_tag=EMACS_23_1_RC&r1=1.14.2.1&r2=1.14.2.2

Patches:
Index: nnmaildir.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/nnmaildir.el,v
retrieving revision 1.14.2.1
retrieving revision 1.14.2.2
diff -u -b -r1.14.2.1 -r1.14.2.2
--- nnmaildir.el        17 Jul 2009 10:16:03 -0000      1.14.2.1
+++ nnmaildir.el        18 Jul 2009 17:17:20 -0000      1.14.2.2
@@ -270,7 +270,7 @@
        (setq attr (file-attributes
                    (concat dir (number-to-string number-linked))))
        (or attr (throw 'return (1- number-linked)))
-       (unless (equal ino-opened (nth 10 attr))
+       (if (/= ino-opened (nth 10 attr))
          (setq number-opened number-linked))))))
 
 ;; Make the given server, if non-nil, be the current server.  Then make the
@@ -361,7 +361,7 @@
                  number-open number-link))
           ((nnmaildir--eexist-p err)
            (let ((attr (file-attributes path-link)))
-             (unless (equal (nth 10 attr) ino-open)
+             (if (/= (nth 10 attr) ino-open)
                (setq number-open number-link
                      number-link 0))))
           (t (signal (car err) (cdr err)))))))))
@@ -744,7 +744,7 @@
            ls (or (nnmaildir--param pgname 'directory-files) srv-ls))
       (unless read-only
        (setq x (nth 11 (file-attributes tdir)))
-       (unless (and (equal x (nth 11 nattr)) (equal x (nth 11 cattr)))
+       (unless (and (= x (nth 11 nattr)) (= x (nth 11 cattr)))
          (setf (nnmaildir--srv-error nnmaildir--cur-server)
                (concat "Maildir spans filesystems: " absdir))
          (throw 'return nil))