emacs: Remove some old emacs-style keybinds

1 files changed, 2 insertions, 18 deletions

diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el
index e8073d0..c1418a9 100644
--- a/emacs/.emacs.d/main.el
+++ b/emacs/.emacs.d/main.el
@@ -363,11 +363,6 @@
 
 (bind-key* "<apps>" #'execute-extended-command)
 
-(unbind-key "C-z")
-(bind-key* "C-<tab>" #'other-window)
-
-(bind-key* "C-x C-r" #'revert-buffer)
-(bind-key* "C-x C-j" #'delete-indentation)
 (unbind-key "C-x C-c")
 
 (bind-key* "C-c i" #'insert-char)
@@ -377,15 +372,10 @@
 (unbind-key "s-n")
 (unbind-key "s-p")
 (unbind-key "s-w")
-(bind-key* "s-k" #'kill-or-delete-this-buffer-dwim)
-
-(bind-key "C-M-a" #'backward-paragraph text-mode-map)
-(bind-key "C-M-e" #'forward-paragraph text-mode-map)
 
 (bind-key* "s-x" (define-prefix-command 'super-x-map))
 (bind-key* "s-," #'switch-to-dotfiles)
 (bind-key* "C-x M-x" #'execute-extended-command)
-(set-register ?z `(file . ,(expand-file-name ".config/zsh/zshrc" "~")))
 
 ;;;;; Crux
 
@@ -393,16 +383,10 @@
 ;; configuration with crux.el
 
 (use-package crux
-  :bind (("M-o" . crux-smart-open-line-above)
-         ("C-o" . crux-smart-open-line)
-
-         ("C-x 4 t" . crux-transpose-windows)
+  :bind (("C-x 4 t" . crux-transpose-windows)
          ("C-c e" . crux-eval-and-replace)
          ("C-c D" . crux-delete-file-and-buffer)
-         ("C-c R" . crux-rename-file-and-buffer))
-  :init (progn
-          (defalias 'delete-current-buffer-file #'crux-delete-file-and-buffer)
-          (defalias 'rename-current-buffer-file #'crux-rename-file-and-buffer)))
+         ("C-c R" . crux-rename-file-and-buffer)))
 
 ;;;; Projects