# HG changeset patch
# User Markus Rost <rost@math.uni-bielefeld.de>
# Date 1034107735 0
# Node ID e635ea5fd01598de050f5efd578b8cbb88bfc9eb
# Parent  32ea29b932e5f0c2b8864eb2d4d096b239b1ce16
Describe the shell command for running cus-test-all in the emacs
source directory.
Fix typo.
Require cus-load explicitly.

diff -r 32ea29b932e5 -r e635ea5fd015 admin/cus-test.el
--- a/admin/cus-test.el	Tue Oct 08 18:50:53 2002 +0000
+++ b/admin/cus-test.el	Tue Oct 08 20:08:55 2002 +0000
@@ -63,7 +63,11 @@
 ;;
 ;;    M-x cus-test-all
 ;;
-;; This function is suitable for batch mode.
+;; This function is suitable for batch mode.  E.g., invoke
+;;
+;;   src/emacs -batch -l admin/cus-test.el -f cus-test-all
+;;
+;; in the emacs source directory.
 ;;
 ;; To make cus-test work one has usually to work-around some existing
 ;; bugs/problems.  Therefore this file contains a "Workaround"
@@ -178,13 +182,13 @@
   "List of problematic variables found by `cus-test-apropos'.")
 
 ;; I haven't understood this :get stuff.  However, there are only very
-;; few variables with a custom-get property.  Such Symbols are stored
+;; few variables with a custom-get property.  Such symbols are stored
 ;; in `cus-test-variables-with-custom-get'.
 (defvar cus-test-variables-with-custom-get nil
   "Set by `cus-test-apropos' to a list of options with :get property.")
 
-;; This loads cus-loads.el, too.
 (require 'cus-edit)
+(require 'cus-load)
 
 (defun cus-test-apropos (regexp)
   "Check the options matching REGEXP.
@@ -331,9 +335,11 @@
 
 (defun cus-test-all nil
   "Run a maximal test by cus-test.
-This function is suitable for batch mode, e.g., invoke
+This function is suitable for batch mode.  E.g., invoke
 
-emacs -batch -l cus-test.el -f cus-test-all"
+  src/emacs -batch -l admin/cus-test.el -f cus-test-all
+
+in the emacs source directory."
   (interactive)
   ;; This does not seem to increase the number of tested options.
   ;;  (message "Running %s" 'cus-test-load-libs)