We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 2cc2d8f commit b4e41b9Copy full SHA for b4e41b9
lisp/org.el
@@ -6401,10 +6401,11 @@ Set it to HEADING when provided."
6401
(interactive)
6402
(org-insert-heading '(4) invisible-ok))
6403
6404
-(defun org-insert-todo-heading-respect-content (&optional force-state)
+(defun org-insert-todo-heading-respect-content (&optional _)
6405
"Insert TODO heading with `org-insert-heading-respect-content' set to t."
6406
6407
- (org-insert-todo-heading '(4) force-state))
+ (let ((org-insert-heading-respect-content t))
6408
+ (org-insert-todo-heading '(4) t)))
6409
6410
(defun org-insert-todo-heading (arg &optional force-heading)
6411
"Insert a new heading with the same level and TODO state as current heading.
0 commit comments