Undo previous change, but leave a comment.

(cus-test-opts): Call cus-test-load-libs.

diff --git a/admin/ChangeLog b/admin/ChangeLog
index e4393040b858d24059b7a3616d6aef726933d364..b6ad402b94d94d8edc52878177bfb2ade1eac414 100644 (file)
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,6 +1,6 @@
 2002-10-14   Markus Rost  <rost@math.ohio-state.edu>
 
-       * cus-test.el (cus-test-deps): Ignore libraries in lisp/term/.
+       * cus-test.el (cus-test-opts): Call cus-test-load-libs.
 
 2002-10-13   Markus Rost  <rost@math.ohio-state.edu>
 

diff --git a/admin/cus-test.el b/admin/cus-test.el
index 9bdc51a05a649630aa397a1f4bcdf583b25910d0..bccdcca6c1f908315c518fab7221dabb6bc504f9 100644 (file)
--- a/admin/cus-test.el
+++ b/admin/cus-test.el
@@ -89,10 +89,13 @@
 ;; 4523 options tested
 ;; The following variables might have problems:
 ;; ps-mule-font-info-database-default
+;; grep-tree-command
+;; grep-find-command
 ;;
 ;; 288 features required
 ;; 10 files loaded
 ;; The following load problems appeared:
+;; (killing x-win (file-error Cannot open load file x-win))
 ;; Symbol faces has loaddefs as custom dependency
 ;; (reftex-index-support reftex-vars (void-function reftex-set-dirty))
 ;; (eshell-script em-script (void-variable eshell-directory-name))
@@ -348,6 +351,8 @@ This function is suitable for batch mode.  E.g., invoke
 
 in the emacs source directory."
   (interactive)
+  (message "Running %s" 'cus-test-load-libs)
+  (cus-test-load-libs)
   (message "Running %s" 'cus-test-load-custom-loads)
   (cus-test-load-custom-loads)
   (message "Running %s" 'cus-test-apropos)
@@ -407,8 +412,9 @@ in the emacs source directory."
            ;; We are still loading it when we call this,
            ;; and it is not in load-history yet.
            ((equal load "cus-edit"))
-           ;; In this test, we don't care about deps in lisp/term/
-           ((locate-library (concat term-file-prefix load)))
+           ;; This would ignore load problems with files in
+           ;; lisp/term/
+           ;; ((locate-library (concat term-file-prefix load)))
            (t
             ;; (condition-case nil (load load) (error nil))
             (condition-case alpha