Update/shorten various custom Emacs bindings

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index ae6afba..6e70ee6 100644 (file)
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -453,11 +453,11 @@ Effectively a very simple light/dark theme toggle switch."
 ;;; General key bindings
 
 (global-set-key (kbd "C-a") #'b/move-indentation-or-beginning-of-line)
 ;;; General key bindings
 
 (global-set-key (kbd "C-a") #'b/move-indentation-or-beginning-of-line)

-(global-set-key (kbd "C-c a i") #'ielm)
+(global-set-key (kbd "C-c i") #'ielm)

 (global-set-key (kbd "C-c d") #'b/duplicate-line-or-region)
 (global-set-key (kbd "C-c j") #'b/join-line-top)
 (global-set-key (kbd "C-S-j") #'b/join-line-top)
 (global-set-key (kbd "C-c d") #'b/duplicate-line-or-region)
 (global-set-key (kbd "C-c j") #'b/join-line-top)
 (global-set-key (kbd "C-S-j") #'b/join-line-top)

-(global-set-key (kbd "C-c s") #'b/*scratch*)
+(global-set-key (kbd "C-c s c") #'b/*scratch*)

 (global-set-key (kbd "C-c x") #'execute-extended-command)
 (global-set-key (kbd "C-c v") #'b/invert-default-face)
 
 (global-set-key (kbd "C-c x") #'execute-extended-command)
 (global-set-key (kbd "C-c v") #'b/invert-default-face)
 


@@ -600,8 +600,8 @@ Effectively a very simple light/dark theme toggle switch."
         scpaste-scp-destination "p:~"))
 (autoload 'scpaste "scpaste" nil t)
 (autoload 'scpaste-region "scpaste" nil t)
         scpaste-scp-destination "p:~"))
 (autoload 'scpaste "scpaste" nil t)
 (autoload 'scpaste-region "scpaste" nil t)

-(global-set-key (kbd "C-c a p p") #'scpaste)
-(global-set-key (kbd "C-c a p r") #'scpaste-region)
+(global-set-key (kbd "C-c p p") #'scpaste)
+(global-set-key (kbd "C-c p r") #'scpaste-region)

 
 \f
 ;;; Editing
 
 \f
 ;;; Editing


@@ -844,7 +844,7 @@ Effectively a very simple light/dark theme toggle switch."
   (setq
    eww-download-directory
    (file-name-as-directory (getenv "XDG_DOWNLOAD_DIR"))))
   (setq
    eww-download-directory
    (file-name-as-directory (getenv "XDG_DOWNLOAD_DIR"))))

-(global-set-key (kbd "C-c a e w") #'eww)
+(global-set-key (kbd "C-c e w") #'eww)

 
 ;; (with-eval-after-load 'org-ref
 ;;   (setq
 
 ;; (with-eval-after-load 'org-ref
 ;;   (setq

diff --git a/.emacs.d/lisp/bandali-erc.el b/.emacs.d/lisp/bandali-erc.el
index 1180e93..a365ac7 100644 (file)
--- a/.emacs.d/lisp/bandali-erc.el
+++ b/.emacs.d/lisp/bandali-erc.el
@@ -161,19 +161,19 @@
 
 ;; global key bindings
 (global-set-key
 
 ;; global key bindings
 (global-set-key

- (kbd "C-c a e l")
+ (kbd "C-c e l")

  (lambda ()
    (interactive)
    (erc-tls :server "irc.libera.chat" :port 6697
             :client-certificate t)))
 (global-set-key
  (lambda ()
    (interactive)
    (erc-tls :server "irc.libera.chat" :port 6697
             :client-certificate t)))
 (global-set-key

- (kbd "C-c a e o")
+ (kbd "C-c e o")

  (lambda ()
    (interactive)
    (erc-tls :server "irc.oftc.net" :port 6697
             :client-certificate t)))
 (global-set-key
  (lambda ()
    (interactive)
    (erc-tls :server "irc.oftc.net" :port 6697
             :client-certificate t)))
 (global-set-key

- (kbd "C-c a e t")
+ (kbd "C-c e t")

  (lambda ()
    (interactive)
    (erc-tls :server "na.tilde.chat" :port 6697
  (lambda ()
    (interactive)
    (erc-tls :server "na.tilde.chat" :port 6697

diff --git a/.emacs.d/lisp/bandali-eshell.el b/.emacs.d/lisp/bandali-eshell.el
index e1326ef..66e7808 100644 (file)
--- a/.emacs.d/lisp/bandali-eshell.el
+++ b/.emacs.d/lisp/bandali-eshell.el
@@ -78,7 +78,7 @@
     (define-key eshell-hist-mode-map (kbd "M-r")
       #'b/eshell-history)))
 ;; global key bindings
     (define-key eshell-hist-mode-map (kbd "M-r")
       #'b/eshell-history)))
 ;; global key bindings

-(global-set-key (kbd "C-c a s e") #'eshell)
+(global-set-key (kbd "C-c s e") #'eshell)

 ;; hooks
 (add-hook 'eshell-mode-hook #'b/eshell-setup)
 
 ;; hooks
 (add-hook 'eshell-mode-hook #'b/eshell-setup)
 

diff --git a/.emacs.d/lisp/bandali-gnus.el b/.emacs.d/lisp/bandali-gnus.el
index febf30f..237e4f3 100644 (file)
--- a/.emacs.d/lisp/bandali-gnus.el
+++ b/.emacs.d/lisp/bandali-gnus.el
@@ -212,8 +212,8 @@
   (add-hook 'gnus-group-mode-hook #'gnus-topic-mode)
   (add-hook 'gnus-group-mode-hook #'gnus-agent-mode))
 ;; global key bindings
   (add-hook 'gnus-group-mode-hook #'gnus-topic-mode)
   (add-hook 'gnus-group-mode-hook #'gnus-agent-mode))
 ;; global key bindings

-(global-set-key (kbd "C-c m") #'gnus-plugged)
-(global-set-key (kbd "C-c M") #'gnus-unplugged)
+(global-set-key (kbd "C-c g") #'gnus-plugged)
+(global-set-key (kbd "C-c G") #'gnus-unplugged)

 
 (with-eval-after-load 'gnus-art
   (setq
 
 (with-eval-after-load 'gnus-art
   (setq