[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 7a50abe: * test/lisp/emacs-lisp/cl-print-tests.el (
From: |
Tino Calancha |
Subject: |
[Emacs-diffs] master 7a50abe: * test/lisp/emacs-lisp/cl-print-tests.el (cl-print-tests-1): Fix regexp. |
Date: |
Mon, 13 Mar 2017 07:03:31 -0400 (EDT) |
branch: master
commit 7a50abee22581e02f0d822c3d9684c0985cdecb2
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>
* test/lisp/emacs-lisp/cl-print-tests.el (cl-print-tests-1): Fix regexp.
---
test/lisp/emacs-lisp/cl-print-tests.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/test/lisp/emacs-lisp/cl-print-tests.el
b/test/lisp/emacs-lisp/cl-print-tests.el
index f46ecde..04ddfee 100644
--- a/test/lisp/emacs-lisp/cl-print-tests.el
+++ b/test/lisp/emacs-lisp/cl-print-tests.el
@@ -34,7 +34,7 @@
(let ((print-circle t))
(should (equal (cl-prin1-to-string `((x . ,x) (y . ,x)))
"((x . #1=#s(cl-print--test :a 1 :b 2)) (y . #1#))")))
- (should (string-match "\\`#f(compiled-function (x) .*)\\'"
+ (should (string-match "\\`#f(compiled-function (x) .*\n\n.*)\\'"
(cl-prin1-to-string (symbol-function #'caar))))))
;;; cl-print-tests.el ends here.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 7a50abe: * test/lisp/emacs-lisp/cl-print-tests.el (cl-print-tests-1): Fix regexp.,
Tino Calancha <=