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

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

[elpa] externals-release/org 5be6507 2/2: org.el (org-sort-remove-invisi


From: ELPA Syncer
Subject: [elpa] externals-release/org 5be6507 2/2: org.el (org-sort-remove-invisible): Remove spurious spaces
Date: Wed, 28 Apr 2021 01:57:18 -0400 (EDT)

branch: externals-release/org
commit 5be650714d14631038aa0ab1e6dcec155efa6146
Author: Juan Manuel Macias <maciaschain@posteo.net>
Commit: Bastien Guerry <bzg@gnu.org>

    org.el (org-sort-remove-invisible): Remove spurious spaces
    
    * org.el (org-sort-remove-invisible): Remove spurious spaces.
    
    TINYCHANGE
---
 lisp/org.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index d972c63..e59424f 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -8081,11 +8081,12 @@ 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]