]> code.delx.au - gnu-emacs/blobdiff - test/automated/core-elisp-tests.el
Merge from gnulib.
[gnu-emacs] / test / automated / core-elisp-tests.el
index bb76ee25c77e5f09d0590bcf8fcb6bde96214d56..1abaa4d7dec77153e31b6b883b9d02d60043eebb 100644 (file)
@@ -1,6 +1,6 @@
 ;;; core-elisp-tests.el --- Testing some core Elisp rules
 
-;; Copyright (C) 2013 Free Software Foundation, Inc.
+;; Copyright (C) 2013-2014 Free Software Foundation, Inc.
 
 ;; Author: Stefan Monnier <monnier@iro.umontreal.ca>
 ;; Keywords:
@@ -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 "doc" 2 :group 'blah) c-e-x)
+                           (defcustom c-e-x 2 "doc" :group 'blah) c-e-x)
                          c-e-x)
                    '(1 2)))))