diff options
author | Alan Pearce | 2014-04-12 13:15:53 +0100 |
---|---|---|
committer | Alan Pearce | 2014-04-12 13:15:53 +0100 |
commit | 81c8016d1e296ed91af69f2d5bf435d7d657af04 (patch) | |
tree | bbccda0a7e252ce2f90bfd648fa7b5edb7d45920 /tag-emacs/emacs.d/elisp/shuffle-lines.el | |
parent | 9dd9b2972c4c526109f4fb57f936b67290ace003 (diff) | |
download | dotfiles-81c8016d1e296ed91af69f2d5bf435d7d657af04.tar.lz dotfiles-81c8016d1e296ed91af69f2d5bf435d7d657af04.tar.zst dotfiles-81c8016d1e296ed91af69f2d5bf435d7d657af04.zip |
Restructure everything to use rcm
https://github.com/thoughtbot/rcm
Diffstat (limited to 'tag-emacs/emacs.d/elisp/shuffle-lines.el')
-rw-r--r-- | tag-emacs/emacs.d/elisp/shuffle-lines.el | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/tag-emacs/emacs.d/elisp/shuffle-lines.el b/tag-emacs/emacs.d/elisp/shuffle-lines.el new file mode 100644 index 0000000..be0a98f --- /dev/null +++ b/tag-emacs/emacs.d/elisp/shuffle-lines.el @@ -0,0 +1,20 @@ +;;;###autoload +(defun move-line-down () + (interactive) + (let ((col (current-column))) + (save-excursion + (forward-line) + (transpose-lines 1)) + (forward-line) + (move-to-column col))) + +;;;###autoload +(defun move-line-up () + (interactive) + (let ((col (current-column))) + (save-excursion + (forward-line) + (transpose-lines -1)) + (move-to-column col))) + +(provide 'shuffle-lines) |