summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/subr-x-tests.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2020-12-22 04:24:25 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2020-12-22 04:24:25 +0100
commitd2b86118629562600c07dbc5befa78ac8b860b68 (patch)
tree0f58a2a3318f272ef14e2c7e0211d4212aece314 /test/lisp/emacs-lisp/subr-x-tests.el
parentc69c65676dbca582dc6c2e59b7e19baf5da4caf0 (diff)
downloademacs-d2b86118629562600c07dbc5befa78ac8b860b68.tar.gz
Further string-clean-whitespace tweaks
* lisp/emacs-lisp/subr-x.el (string-clean-whitespace): Put \r back, which was mistakenly removed.
Diffstat (limited to 'test/lisp/emacs-lisp/subr-x-tests.el')
-rw-r--r--test/lisp/emacs-lisp/subr-x-tests.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/subr-x-tests.el b/test/lisp/emacs-lisp/subr-x-tests.el
index ab5a5bfa641..2e16cd0f30b 100644
--- a/test/lisp/emacs-lisp/subr-x-tests.el
+++ b/test/lisp/emacs-lisp/subr-x-tests.el
@@ -584,7 +584,7 @@
(ert-deftest subr-clean-whitespace ()
(should (equal (string-clean-whitespace " foo ") "foo"))
- (should (equal (string-clean-whitespace " foo \n\t Bar") "foo Bar")))
+ (should (equal (string-clean-whitespace " foo \r\n\t  Bar") "foo Bar")))
(ert-deftest subr-string-fill ()
(should (equal (string-fill "foo" 10) "foo"))