* test/automated/core-elisp-tests.el (core-elisp-tests): Fix defcustom.

diff --git a/test/ChangeLog b/test/ChangeLog
index 0b42f5d2be37412a273f8c8b4d2e376eb0171cb1..ae66b25897e5c3ae13c242d086120bb9b6119955 100644 (file)
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,5 +1,7 @@
 2013-08-03  Glenn Morris  <rgm@gnu.org>
 
+       * automated/core-elisp-tests.el (core-elisp-tests): Fix defcustom.
+
        * automated/icalendar-tests.el (icalendar-tests--test-export)
        (icalendar-tests--test-import):
        Use getenv/setenv rather than set-time-zone-rule.

diff --git a/test/automated/core-elisp-tests.el b/test/automated/core-elisp-tests.el
index 809be10bc02813c560fdf8f515c94ddeffcc55a8..bb76ee25c77e5f09d0590bcf8fcb6bde96214d56 100644 (file)
--- a/test/automated/core-elisp-tests.el
+++ b/test/automated/core-elisp-tests.el
@@ -31,7 +31,9 @@
     ;; is properly initialized.
     (should (equal (list (let ((c-e-x 1)) (defvar c-e-x 2) c-e-x) c-e-x)
                    '(1 2)))
-    (should (equal (list (let ((c-e-x 1)) (defcustom c-e-x 2) c-e-x) c-e-x)
+    (should (equal (list (let ((c-e-x 1))
+                           (defcustom c-e-x "doc" 2 :group 'blah) c-e-x)
+                         c-e-x)
                    '(1 2)))))
 
 (provide 'core-elisp-tests)