From 7e86d3bb9b61e3e2c2389e66370df037bd8a8f43 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Mon, 21 Dec 2020 23:18:05 +0100 Subject: [PATCH] Make string-chop-newline more efficient * lisp/emacs-lisp/subr-x.el (string-chop-newline): Make more efficient. --- lisp/emacs-lisp/subr-x.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el index 4d1a73a251a..1c8e1d6293f 100644 --- a/lisp/emacs-lisp/subr-x.el +++ b/lisp/emacs-lisp/subr-x.el @@ -341,7 +341,7 @@ string." (defun string-chop-newline (string) "Remove the final newline (if any) from STRING." - (replace-regexp-in-string "\n\\'" "" string)) + (string-remove-suffix "\n" string)) (defun replace-region-contents (beg end replace-fn &optional max-secs max-costs) -- 2.39.5