tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

Revert "org.el (org-sort-remove-invisible): Remove spurious spaces" 

This reverts commit 5be650714d.
This commit is contained in:
Bastien Guerry 2021-04-28 08:48:29 +02:00
parent 5be650714d
commit ebcee052fd
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/org.el
View File

@ -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.