From ebcee052fd23b7abe7fd4e24341615b66dd0fa06 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Wed, 28 Apr 2021 08:48:29 +0200 Subject: [PATCH] Revert "org.el (org-sort-remove-invisible): Remove spurious spaces" This reverts commit 5be650714d14631038aa0ab1e6dcec155efa6146. --- lisp/org.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index e59424f3f..d972c63ef 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -8081,12 +8081,11 @@ Optional argument WITH-CASE means sort case-sensitively." "Remove invisible part of links and emphasis markers from string S." (remove-text-properties 0 (length s) org-rm-props s) (replace-regexp-in-string - org-verbatim-re (lambda (m) (format "%s" (match-string 4 m))) + org-verbatim-re (lambda (m) (format "%s " (match-string 4 m))) (replace-regexp-in-string - org-emph-re (lambda (m) (format "%s" (match-string 4 m))) + org-emph-re (lambda (m) (format " %s " (match-string 4 m))) (org-link-display-format s) - t t) - t t)) + t t) t t)) (defvar org-after-sorting-entries-or-items-hook nil "Hook that is run after a bunch of entries or items have been sorted.