浏览代码

org-archive.el: Use `org-outline-regexp' instead of `outline-regexp'.

* org-archive.el (org-archive-to-archive-sibling): Use
`org-outline-regexp' instead of `outline-regexp'.
Bastien Guerry 13 年之前
父节点
当前提交
d13476b918
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-archive.el

+ 1 - 1
lisp/org-archive.el

@@ -354,7 +354,7 @@ sibling does not exist, it will be created at the end of the subtree."
     (widen)
     (widen)
     (let (b e pos leader level)
     (let (b e pos leader level)
       (org-back-to-heading t)
       (org-back-to-heading t)
-      (looking-at outline-regexp)
+      (looking-at org-outline-regexp)
       (setq leader (match-string 0)
       (setq leader (match-string 0)
 	    level (funcall outline-level))
 	    level (funcall outline-level))
       (setq pos (point))
       (setq pos (point))