procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Tiny string-clean-whitespace simplification

Browse source 
* lisp/emacs-lisp/subr-x.el (string-clean-whitespace): Streamline by
treating replacement string as being literal and having fixed case.
This commit is contained in:
Basil L. Contovounesios 2020-12-21 22:34:33 +00:00
parent 7e86d3bb9b
commit 27fab4b140
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/subr-x.el
View file

@ -270,7 +270,7 @@ All sequences of whitespaces in STRING are collapsed into a
single space character, and leading/trailing whitespace is
removed."
(let ((blank "[[:blank:]\n]+"))
(string-trim (replace-regexp-in-string blank " " string)
(string-trim (replace-regexp-in-string blank " " string t t)
blank blank)))
(defun string-fill (string length)