diff --git a/lisp/org.el b/lisp/org.el index d0a2218a3..67ed452b0 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -6834,7 +6834,7 @@ Works for outline headings and for plain lists alike." (org-insert-heading arg) (cond ((org-on-heading-p) (org-do-demote)) - ((org-at-item-p) (org-indent-item 1)))) + ((org-at-item-p) (org-indent-item)))) (defun org-insert-todo-subheading (arg) "Insert a new subheading with TODO keyword or checkbox and demote it. @@ -6843,7 +6843,7 @@ Works for outline headings and for plain lists alike." (org-insert-todo-heading arg) (cond ((org-on-heading-p) (org-do-demote)) - ((org-at-item-p) (org-indent-item 1)))) + ((org-at-item-p) (org-indent-item)))) ;;; Promotion and Demotion