[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.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals-release/org ebcee05: Revert "org.el (org-sort-remove-invisible): Remove spurious spaces",
ELPA Syncer <=