From: rearman <rearman@r717.net>
Date: Thu, 5 Jan 2023 12:47:37 +0000 (-0500)
Subject: Remove C-h binding, comment out magit-fullscreen
X-Git-Url: https://git.earman.xyz/?a=commitdiff_plain;h=d6998d52c1eef9c4ce437f61a2564c2fe83825c3;p=emacsinit.git

Remove C-h binding, comment out magit-fullscreen

Removing the C-h -> backspace binding, not used much with the new keyboard
layout.

Commenting out the magit-fullscreen stuff to try magit without it again.  Main
thing was annoyance with magit buffers hanging around, but with midnight-mode
this shouldn't be as much of an issue...Leaving in place just in case I change
my mind again.
---

diff --git a/init.el b/init.el
index ec8c008..1e16ffc 100644
--- a/init.el
+++ b/init.el
@@ -206,18 +206,18 @@ Stolen from http://whattheemacsd.com"
 	     (set-window-start w2 s1)
 	     (setq i (1+ i)))))))
 
-(defadvice magit-status (around magit-fullscreen activate)
-  "Stolen from http://whattheemacsd.com"
-  (window-configuration-to-register :magit-fullscreen)
-  ad-do-it
-  (delete-other-windows))
-
-(defun magit-quit-session ()
-  "Restores the previous window configuration and kills the magit buffer.
-Stolen from http://whattheemacsd.com"
-  (interactive)
-  (kill-matching-buffers "magit" nil t)
-  (jump-to-register :magit-fullscreen))
+;; (defadvice magit-status (around magit-fullscreen activate)
+;;   "Stolen from http://whattheemacsd.com"
+;;   (window-configuration-to-register :magit-fullscreen)
+;;   ad-do-it
+;;   (delete-other-windows))
+;;
+;; (defun magit-quit-session ()
+;;   "Restores the previous window configuration and kills the magit buffer.
+;; Stolen from http://whattheemacsd.com"
+;;   (interactive)
+;;   (kill-matching-buffers "magit" nil t)
+;;   (jump-to-register :magit-fullscreen))
 
 (defun smart-beginning-of-line ()
   "Move point to first non-whitespace character or beginning-of-line.
@@ -329,7 +329,6 @@ Intended for use as an after-save-hook."
 (global-set-key (kbd "<f8>") 'recentf-open-files)
 ;; OVERRIDES
 (global-set-key [remap move-beginning-of-line] 'smart-beginning-of-line)
-(global-set-key (kbd "C-h") 'backward-delete-char-untabify)
 (global-set-key (kbd "M-j") 'backward-join-line)
 (global-set-key (kbd "M-S-j") 'join-line)
 (global-set-key (kbd "C-S-k") 'kill-whole-line)
@@ -351,10 +350,13 @@ Intended for use as an after-save-hook."
 (global-set-key (kbd "M-%") 'replace-string)
 (global-set-key (kbd "C-M-%") 'query-replace-regexp)
 ;; MODE-SPECIFIC
-(add-hook 'eshell-mode-hook (lambda () (define-key eshell-mode-map (kbd ")") 'eshell-send-on-close-paren)))
-(add-hook 'org-mode-hook (lambda () (define-key org-mode-map (kbd "C-'") nil)
+(add-hook 'eshell-mode-hook (lambda ()
+			      (define-key eshell-mode-map (kbd ")") 'eshell-send-on-close-paren)))
+(add-hook 'org-mode-hook (lambda ()
+			   (define-key org-mode-map (kbd "C-'") nil)
 			   (define-key org-mode-map (kbd "C-,") nil)))
-(add-hook 'org-agenda-mode-hook (lambda () (define-key org-agenda-mode-map (kbd "C-'") nil)
+(add-hook 'org-agenda-mode-hook (lambda ()
+				  (define-key org-agenda-mode-map (kbd "C-'") nil)
 				  (define-key org-agenda-mode-map (kbd "C-,") nil)))
 
 (custom-set-variables