diff options
| author | Artur Malabarba | 2015-11-12 23:32:40 +0000 |
|---|---|---|
| committer | Artur Malabarba | 2015-11-12 23:32:40 +0000 |
| commit | 0c928266114aa75c7bfa1842fe5023174d2984c8 (patch) | |
| tree | 6cd24742c5384b94b67556f5b6fa144d1f70edee /test | |
| parent | 39dbd1cd0f6cc007722f1d120d3be219d1cb5963 (diff) | |
| download | emacs-0c928266114aa75c7bfa1842fe5023174d2984c8.tar.gz emacs-0c928266114aa75c7bfa1842fe5023174d2984c8.zip | |
* test/automated/cl-lib-tests.el (cl-lib-struct-constructors): Small fix
Diffstat (limited to 'test')
| -rw-r--r-- | test/automated/cl-lib-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/automated/cl-lib-tests.el b/test/automated/cl-lib-tests.el index 9b230db99e4..e2429b7de37 100644 --- a/test/automated/cl-lib-tests.el +++ b/test/automated/cl-lib-tests.el | |||
| @@ -222,8 +222,8 @@ | |||
| 222 | (def . ,(or `nil `(nil)))) | 222 | (def . ,(or `nil `(nil)))) |
| 223 | t))))) | 223 | t))))) |
| 224 | (ert-deftest cl-lib-struct-constructors () | 224 | (ert-deftest cl-lib-struct-constructors () |
| 225 | (should (equal (documentation 'cl-lib--con-2 t) | 225 | (should (string-match "\\`Constructor docstring." |
| 226 | "Constructor docstring.")) | 226 | (documentation 'cl-lib--con-2 t))) |
| 227 | (should (mystruct-p (cl-lib--con-1))) | 227 | (should (mystruct-p (cl-lib--con-1))) |
| 228 | (should (mystruct-p (cl-lib--con-2)))) | 228 | (should (mystruct-p (cl-lib--con-2)))) |
| 229 | 229 | ||