diff options
author | Thomas Voss <mail@thomasvoss.com> | 2024-11-01 16:49:15 +0100 |
---|---|---|
committer | Thomas Voss <mail@thomasvoss.com> | 2024-11-01 16:49:15 +0100 |
commit | ea7f7f15d29f42263822db68fe8a8752749a7b35 (patch) | |
tree | a19943b45dbf7790bcd4dac103a1a86dce671fd2 /.config/emacs/editing.el | |
parent | c38c3a4c67d8b108de8951a395d3faf8bef7b733 (diff) |
emacs: Remove some commands
Diffstat (limited to '.config/emacs/editing.el')
-rw-r--r-- | .config/emacs/editing.el | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/.config/emacs/editing.el b/.config/emacs/editing.el index 66a5953..e400588 100644 --- a/.config/emacs/editing.el +++ b/.config/emacs/editing.el @@ -30,29 +30,6 @@ with the next one instead of the previous one." (unless (or beg end) (not arg)) beg end)) -(defun e/transpose-previous-chars () - "Transpose the two characters preceeding point. -This command is similar to `transpose-chars' except it transposes the -two characters that preceed the point instead of the characters that -surround it." - (interactive "*") - (save-excursion - (backward-char) - (transpose-chars 1))) - -(defun e/transpose-current-and-next-lines () - "Transpose the current and next lines. -This command is similar to `transpose-lines' except it transposes the -current and next lines instead of the current and previous lines. This -maintains symmetry with `transpose-words'." - (interactive "*") - (let ((column (current-column))) - (forward-line) - (transpose-lines 1) - (forward-line -1) - (indent-region (pos-bol) (pos-eol)) - (move-to-column column))) - (defun e/mark-entire-word (&optional arg allow-extend) "Mark ARG words beginning at point. This command is a wrapper around `mark-word' that moves the point such |