瀏覽代碼

Merge branch 'maint'

Bastien Guerry 12 年之前
父節點
當前提交
eceb2ff7d1
共有 1 個文件被更改,包括 6 次插入1 次删除
  1. 6 1
      lisp/org.el

+ 6 - 1
lisp/org.el

@@ -11338,7 +11338,12 @@ avoiding backtracing.  Refile target collection makes use of that."
 	  (widen)
 	  (while (org-up-heading-safe)
 	    (when (looking-at org-complex-heading-regexp)
-	      (push (org-match-string-no-properties 4) rtn)))
+	      (push (org-trim
+		     (replace-regexp-in-string
+		      ;; Remove statistical/checkboxes cookies
+		      "\\[[0-9]+%\\]\\|\\[[0-9]+/[0-9]+\\]" ""
+		      (org-match-string-no-properties 4)))
+		    rtn)))
 	  rtn)))))
 
 (defun org-format-outline-path (path &optional width prefix separator)