diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2023-06-17 18:05:33 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2023-06-17 18:05:33 -0400 |
| commit | a9c962be961ae121c4202943879dcf28f3a8364a (patch) | |
| tree | ef918d1e6c317c30c9924a9216b18fda77bc703d /test/lisp/emacs-lisp/pp-tests.el | |
| parent | 017475a70ed51b69ebe41610e0dd1299bda1bfe3 (diff) | |
| download | emacs-a9c962be961ae121c4202943879dcf28f3a8364a.tar.gz emacs-a9c962be961ae121c4202943879dcf28f3a8364a.tar.bz2 emacs-a9c962be961ae121c4202943879dcf28f3a8364a.zip | |
pp-fill: Fix tests breakage
* lisp/emacs-lisp/pp.el (pp-to-string, pp-buffer, pp): Preserve old
behavior of (almost always) returning a trailing newline.
* test/lisp/emacs-lisp/pp-tests.el (pp-print-quote): Adjust tests, now
that `pp-to-string` always returns a trailing newline, rather than only
most of the time.
* test/lisp/emacs-lisp/backtrace-tests.el
(backtrace-tests--single-and-multi-line): Make the test less sensitive
to the choice of what is "pretty".
Diffstat (limited to 'test/lisp/emacs-lisp/pp-tests.el')
| -rw-r--r-- | test/lisp/emacs-lisp/pp-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/pp-tests.el b/test/lisp/emacs-lisp/pp-tests.el index 72c7cb880d2..1b248e19a31 100644 --- a/test/lisp/emacs-lisp/pp-tests.el +++ b/test/lisp/emacs-lisp/pp-tests.el @@ -23,8 +23,8 @@ (require 'ert-x) (ert-deftest pp-print-quote () - (should (string= (pp-to-string 'quote) "quote")) - (should (string= (pp-to-string ''quote) "'quote")) + (should (string= (pp-to-string 'quote) "quote\n")) + (should (string= (pp-to-string ''quote) "'quote\n")) (should (string= (pp-to-string '('a 'b)) "('a 'b)\n")) (should (string= (pp-to-string '(''quote 'quote)) "(''quote 'quote)\n")) (should (string= (pp-to-string '(quote)) "(quote)\n")) |