ソースを参照

Fix sorting with a bold emphasis at beginning of line

* lisp/org.el (org-sort-entries): Fix sorting with a bold emphasis at bol
Carsten Dominik 14 年 前
コミット
378beac762
1 ファイル変更1 行追加1 行削除
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

@@ -7744,7 +7744,7 @@ WITH-CASE, the sorting considers case as well."
     (looking-at "\\(\\*+\\)")
     (setq stars (match-string 1)
 	  re (concat "^" (regexp-quote stars) " +")
-	  re2 (concat "^" (regexp-quote (substring stars 0 -1)) "[^*]")
+	  re2 (concat "^" (regexp-quote (substring stars 0 -1)) "[ \t\n]")
 	  txt (buffer-substring beg end))
     (if (not (equal (substring txt -1) "\n")) (setq txt (concat txt "\n")))
     (if (and (not (equal stars "*")) (string-match re2 txt))