Function: org-agenda-deadline
org-agenda-deadline is an interactive and byte-compiled function
defined in org-agenda.el.gz.
Signature
(org-agenda-deadline ARG &optional TIME)
Documentation
Schedule the item at point.
ARG is passed through to org-deadline.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/org/org-agenda.el.gz
(defun org-agenda-deadline (arg &optional time)
"Schedule the item at point.
ARG is passed through to `org-deadline'."
(interactive "P")
(org-agenda-check-type t 'agenda 'todo 'tags 'search)
(org-agenda-check-no-diary)
(org-agenda-maybe-loop
#'org-agenda-deadline arg t nil
(let* ((marker (or (org-get-at-bol 'org-marker)
(org-agenda-error)))
(buffer (marker-buffer marker))
(pos (marker-position marker))
ts)
(org-with-remote-undo buffer
(with-current-buffer buffer
(widen)
(goto-char pos)
(setq ts (org-deadline arg time)))
(org-agenda-show-new-time marker ts " D"))
(message "%s" ts))))