mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-29 21:37:50 +00:00
org: Improve org-todo handling of negative prefix args
* lisp/org.el (org-todo): Handle -1 prefix args consistently and error on other negative args.
This commit is contained in:
parent
9fb9a2bdfb
commit
bfd63cc4f2
|
@ -8901,7 +8901,8 @@ When called through ELisp, arg is also interpreted in the following way:
|
|||
nil cl
|
||||
(when (org-invisible-p) (org-end-of-subtree nil t))))
|
||||
(when (equal arg '(16)) (setq arg 'nextset))
|
||||
(when (equal arg -1) (org-cancel-repeater) (setq arg nil))
|
||||
(when (equal (prefix-numeric-value arg) -1) (org-cancel-repeater) (setq arg nil))
|
||||
(when (< (prefix-numeric-value arg) -1) (user-error "Prefix argument %d not supported" arg))
|
||||
(let ((org-blocker-hook org-blocker-hook)
|
||||
commentp
|
||||
case-fold-search)
|
||||
|
|
Loading…
Reference in a new issue