emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals-release/org ebcee05: Revert "org.el (org-sort-remove-in


From: ELPA Syncer
Subject: [elpa] externals-release/org ebcee05: Revert "org.el (org-sort-remove-invisible): Remove spurious spaces"
Date: Wed, 28 Apr 2021 02:57:09 -0400 (EDT)

branch: externals-release/org
commit ebcee052fd23b7abe7fd4e24341615b66dd0fa06
Author: Bastien Guerry <bzg@gnu.org>
Commit: Bastien Guerry <bzg@gnu.org>

    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 e59424f..d972c63 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.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]