How are these functions different from org-metaup and org-metadown which are bound to M-up arrow and M-down arrow on my system?
-Bernt Richard KLINDA <rkli...@gmail.com> writes: > Here are two functions for moving things around. Useful to bind them to > keys. > > Carsten, please include these functions in org if you think it's ok. > > ,----[ for me it is ] > | (define-key org-mode-map [(alt ?N)] 'org-move-thing-up) > | (define-key org-mode-map [(alt ?T)] 'org-move-thing-down) > `---- > > ,---- > | (defun org-move-thing-up () > | "Move table row, headline or list item up." > | (interactive) > | (let ((headline-p (save-excursion > | (beginning-of-line) > | (when (looking-at (concat "^\\(" outline-regexp > "\\)")) > | t)))) > | (cond ((org-at-table-p) (org-table-move-row-up)) > | (headline-p (org-move-subtree-up)) > | (t (org-move-item-up 1))))) > | > | (defun org-move-thing-down () > | "Move table row, headline or list item down." > | (interactive) > | (let ((headline-p (save-excursion > | (beginning-of-line) > | (when (looking-at (concat "^\\(" outline-regexp > "\\)")) > | t)))) > | (cond ((org-at-table-p) (org-table-move-row-down)) > | (headline-p (org-move-subtree-down)) > | (t (org-move-item-down))))) > `---- > > -- > Udv, Richard > > > _______________________________________________ > Emacs-orgmode mailing list > Remember: use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode _______________________________________________ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode