From d2b86118629562600c07dbc5befa78ac8b860b68 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 22 Dec 2020 04:24:25 +0100 Subject: Further string-clean-whitespace tweaks * lisp/emacs-lisp/subr-x.el (string-clean-whitespace): Put \r back, which was mistakenly removed. --- lisp/emacs-lisp/subr-x.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el index aa39fc1538f..6f4f7ed5dce 100644 --- a/lisp/emacs-lisp/subr-x.el +++ b/lisp/emacs-lisp/subr-x.el @@ -269,7 +269,7 @@ carriage return." All sequences of whitespaces in STRING are collapsed into a single space character, and leading/trailing whitespace is removed." - (let ((blank "[[:blank:]\n]+")) + (let ((blank "[[:blank:]\r\n]+")) (string-trim (replace-regexp-in-string blank " " string t t) blank blank))) -- cgit v1.2.3