Function: org-shiftmetaup

org-shiftmetaup is an interactive and byte-compiled function defined in org.el.gz.

Signature

(org-shiftmetaup &optional ARG)

Documentation

Drag the line at point up.

In a table, kill the current row. On a clock timestamp, update the value of the timestamp like S-<up> but also adjust the previous clocked item in the clock history. Everywhere else, drag the line at point up.

This function runs the functions in org-shiftmetaup-hook one by one as a first step, and exits immediately if a function from the hook returns non-nil. In the absence of a specific context, the function also runs org-shiftmetaup-final-hook using the same logic.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/org/org.el.gz
(defun org-shiftmetaup (&optional _arg)
  "Drag the line at point up.
In a table, kill the current row.
On a clock timestamp, update the value of the timestamp like `S-<up>'
but also adjust the previous clocked item in the clock history.
Everywhere else, drag the line at point up.

This function runs the functions in `org-shiftmetaup-hook' one by
one as a first step, and exits immediately if a function from the
hook returns non-nil.  In the absence of a specific context, the
function also runs `org-shiftmetaup-final-hook' using the same
logic."
  (interactive "P")
  (cond
   ((run-hook-with-args-until-success 'org-shiftmetaup-hook))
   ((org-at-table-p) (call-interactively 'org-table-kill-row))
   ((org-at-clock-log-p) (let ((org-clock-adjust-closest t))
			   (call-interactively 'org-timestamp-up)))
   ((run-hook-with-args-until-success 'org-shiftmetaup-final-hook))
   (t (call-interactively 'org-drag-line-backward))))