branch: externals/ergoemacs-mode commit ad4202a293b3d0d44adfdffc4710a9fb9be4e4c4 Author: Walter Landry <wlan...@caltech.edu> Commit: Walter Landry <wlan...@caltech.edu>
Remove unused components --- ergoemacs-themes.el | 56 ----------------------------------------------------- 1 file changed, 56 deletions(-) diff --git a/ergoemacs-themes.el b/ergoemacs-themes.el index 11f31b7..30f7682 100644 --- a/ergoemacs-themes.el +++ b/ergoemacs-themes.el @@ -444,22 +444,12 @@ calling any other ergoemacs-set-* function" (ergoemacs-global-set-key (kbd "M-r") 'kill-word) ) -(ergoemacs-component move-word () - "Moving around and deleting words" - ;; Mode specific movement - ) - (defun ergoemacs-set-move-paragraph () "Move by Paragraph" (ergoemacs-global-set-key (kbd "M-U") 'backward-paragraph) (ergoemacs-global-set-key (kbd "M-O") 'forward-paragraph) ) -(ergoemacs-component move-paragraph () - "Move by Paragraph" - ;; Mode specific movement -) - (defun ergoemacs-set-move-line () "Move by Line" (global-set-key (kbd "M-h") 'move-beginning-of-line) @@ -483,21 +473,11 @@ calling any other ergoemacs-set-* function" (ergoemacs-global-set-key (kbd "M-K") 'scroll-up-command) ) -(ergoemacs-component move-page () - "Move by Page" - ;; Mode specific movement - ) - (defun ergoemacs-set-move-buffer () (ergoemacs-global-set-key (kbd "M-n") 'ergoemacs-beginning-or-end-of-buffer) (ergoemacs-global-set-key (kbd "M-N") 'ergoemacs-end-or-beginning-of-buffer) ) -(ergoemacs-component move-buffer () - "Move Beginning/End of buffer" - ;; Mode specific movement - ) - (defun ergoemacs-set-move-bracket () "Move By Bracket" (ergoemacs-global-set-key (kbd "M-J") 'ergoemacs-backward-open-bracket) @@ -506,11 +486,6 @@ calling any other ergoemacs-set-* function" (global-set-key (kbd "<M-right>") 'ergoemacs-forward-close-bracket) ) -(ergoemacs-component move-bracket () - "Move By Bracket" - ;; Mode specific movement - ) - (defun ergoemacs-set-copy () "Copy, Cut, Paste, Redo and Undo" (ergoemacs-global-set-key (kbd "M-x") 'ergoemacs-cut-line-or-region) @@ -597,40 +572,23 @@ calling any other ergoemacs-set-* function" (ergoemacs-global-set-key (kbd "M-)") 'delete-window) ) -(ergoemacs-component switch () - "Window/Frame/Tab Switching" - ;; Mode specific changes - ) - (defun ergoemacs-set-execute () "Execute Commands" (ergoemacs-global-set-key (kbd "M-a") 'execute-extended-command) (ergoemacs-global-set-key (kbd "M-A") 'shell-command) ) -(ergoemacs-component execute () - "Execute Commands" - ) - (defun ergoemacs-set-misc () "Misc Commands" (ergoemacs-global-set-key (kbd "M-p") 'recenter-top-bottom) (ergoemacs-global-set-key (kbd "M-b") 'switch-to-buffer) ) -(ergoemacs-component misc () - "Misc Commands" - ) - (defun ergoemacs-set-kill-line () "Kill Line" (ergoemacs-global-set-key (kbd "M-g") 'kill-line) (ergoemacs-global-set-key (kbd "M-G") 'ergoemacs-kill-line-backward)) -(ergoemacs-component kill-line () - "Kill Line" - ) - (defun ergoemacs-set-text-transform () "Text Transformation" (global-set-key (kbd "M-'") 'comment-dwim) @@ -669,10 +627,6 @@ calling any other ergoemacs-set-* function" (ergoemacs-global-set-key (kbd "M-&") 'ergoemacs-select-current-line) ) -(ergoemacs-component select-items () - "Select Items" - ) - (defun ergoemacs-set-quit () "Escape exits" (ergoemacs-global-set-key (kbd "<escape>") 'keyboard-quit) @@ -1243,19 +1197,9 @@ calling any other ergoemacs-set-* function" :components '(copy dired-tab dired-to-wdired - execute - kill-line - misc - move-bracket - move-buffer move-char move-line - move-page - move-paragraph - move-word search - select-items - switch text-transform ergoemacs-remaps) :optional-on '(backspace-del-seq