]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lisp/shadow.el
(ewoc-create, ewoc-map, ewoc-locate, ewoc-invalidate, ewoc-collect):
[gnu-emacs] / lisp / emacs-lisp / shadow.el
index 82230b1d2ec586f5e0123d30cbefd44965ac6720..eeaaa7ffc0aa9a66dbc2a2ded17a22d026584a22 100644 (file)
@@ -161,7 +161,7 @@ See the documentation for `list-load-path-shadows' for further information."
                 ;; sizes.
                 (and (= (nth 7 (file-attributes f1))
                         (nth 7 (file-attributes f2)))
-                     (zerop (call-process "cmp" nil nil nil "-s" f1 f2))))))))
+                     (eq 0 (call-process "cmp" nil nil nil "-s" f1 f2))))))))
 \f
 ;;;###autoload
 (defun list-load-path-shadows ()
@@ -257,4 +257,5 @@ version unless you know what you are doing.\n")
 
 (provide 'shadow)
 
+;;; arch-tag: 0480e8a7-62ed-4a12-a9f6-f44ded9b0830
 ;;; shadow.el ends here