浏览代码

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

This reverts commit 5be650714d14631038aa0ab1e6dcec155efa6146.
Bastien Guerry 4 年之前
父节点
当前提交
ebcee052fd
共有 1 个文件被更改,包括 3 次插入4 次删除
  1. 3 4
      lisp/org.el

+ 3 - 4
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.