(cus-test-libs): Use equal instead of =.

2 files changed, 6 insertions, 1 deletions

diff --git a/admin/ChangeLog b/admin/ChangeLog
index b6ad402b94d..c1813dcc8d9 100644
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,3 +1,7 @@
+2002-10-15   Markus Rost  <rost@math.ohio-state.edu>
+
+        * cus-test.el (cus-test-libs): Use equal instead of =.
+
 2002-10-14   Markus Rost  <rost@math.ohio-state.edu>
 
         * cus-test.el (cus-test-opts): Call cus-test-load-libs.
diff --git a/admin/cus-test.el b/admin/cus-test.el
index f6062c9f7f0..8885b097873 100644
--- a/admin/cus-test.el
+++ b/admin/cus-test.el
@@ -109,6 +109,7 @@
 ;; (ada-xref error 255)
 ;; (ada-stmt error 255)
 
+
 ;;; Code:
 
 ;;; Workarounds.  For a smooth run and to avoid some side effects.
@@ -458,7 +459,7 @@ in the emacs source directory."
              (setq cmd (concat "src/emacs -batch -l " fn))
              (setq status (call-process shell-file-name nil nil nil
                                         shell-command-switch cmd))
-             (if (= status 0)
+             (if (equal status 0)
                  (message "%s" file)
                (error "%s" status))
              (push file cus-test-libs-loaded))