diff options
| -rw-r--r-- | .config/emacs/editing.el | 23 | ||||
| -rw-r--r-- | .config/emacs/modules/mm-keybindings.el | 2 |
2 files changed, 0 insertions, 25 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 diff --git a/.config/emacs/modules/mm-keybindings.el b/.config/emacs/modules/mm-keybindings.el index 746d95c..915d845 100644 --- a/.config/emacs/modules/mm-keybindings.el +++ b/.config/emacs/modules/mm-keybindings.el @@ -88,8 +88,6 @@ the first command is remapped to the second command." mark-sexp e/mark-entire-sexp mark-word e/mark-entire-word open-line e/open-line - transpose-chars e/transpose-previous-chars - transpose-lines e/transpose-current-and-next-lines yank e/yank) (with-eval-after-load 'cc-vars |