瀏覽代碼

Bug fix.

Patch from Peter Jones.
Carsten Dominik 16 年之前
父節點
當前提交
78d2d64353
共有 2 個文件被更改,包括 6 次插入1 次删除
  1. 5 0
      lisp/ChangeLog
  2. 1 1
      lisp/org.el

+ 5 - 0
lisp/ChangeLog

@@ -1,3 +1,8 @@
+2008-10-23  Carsten Dominik  <dominik@science.uva.nl>
+
+	* org.el (org-insert-todo-heading): Fix bug with force-heading
+	argument.
+
 2008-10-22  Carsten Dominik  <dominik@science.uva.nl>
 
 	* org-exp.el (org-export-as-ascii): Handle the case that we are

+ 1 - 1
lisp/org.el

@@ -4694,7 +4694,7 @@ but create the new hedline after the current line."
 If the heading has no TODO state, or if the state is DONE, use the first
 state (TODO by default).  Also with prefix arg, force first state."
   (interactive "P")
-  (when (not (org-insert-item 'checkbox))
+  (when (or force-heading (not (org-insert-item 'checkbox)))
     (org-insert-heading force-heading)
     (save-excursion
       (org-back-to-heading)