* test/automated/cl-lib-tests.el (cl-lib-struct-constructors): Small fix

This commit is contained in:
Artur Malabarba 2015-11-12 23:32:40 +00:00
parent 39dbd1cd0f
commit 0c92826611

View file

@ -222,8 +222,8 @@
(def . ,(or `nil `(nil))))
t)))))
(ert-deftest cl-lib-struct-constructors ()
(should (equal (documentation 'cl-lib--con-2 t)
"Constructor docstring."))
(should (string-match "\\`Constructor docstring."
(documentation 'cl-lib--con-2 t)))
(should (mystruct-p (cl-lib--con-1)))
(should (mystruct-p (cl-lib--con-2))))