-

[gnu-emacs] / test / lisp / legacy / core-elisp-tests.el

diff --git a/test/lisp/legacy/core-elisp-tests.el b/test/lisp/legacy/core-elisp-tests.el
index 76985331566ee226bb567c846373905125de3374..b44bb37cc4fd84cd1d854ce799e5016783951f78 100644 (file)
--- a/test/lisp/legacy/core-elisp-tests.el
+++ b/test/lisp/legacy/core-elisp-tests.el
@@ -32,7 +32,7 @@
     (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 "doc" :group 'blah) c-e-x)
+                           (defcustom c-e-x 2 "doc" :group 'blah :type 'integer) c-e-x)
                          c-e-x)
                    '(1 2)))))