X-Git-Url: https://git.shemshak.org/~bandali/configs/blobdiff_plain/26906e22b470f44d27a9d1075499abe241207c44..526dc1d93664062cfdb0e55bd6623d9dc7993471:/.emacs.d/init.el

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 21eecd6..007cf6f 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -473,8 +473,6 @@ For disabling the behaviour for certain buffers and/or modes."
  ("C-c F d" . delete-frame)
  ("C-c F D" . server-edit)
 
- ("C-c o"   . other-window)
-
  ("C-S-h C" . describe-char)
  ("C-S-h F" . describe-face)
 
@@ -484,6 +482,9 @@ For disabling the behaviour for certain buffers and/or modes."
  ("s-p"     . beginning-of-buffer)
  ("s-n"     . end-of-buffer)
 
+ ("M-o"     . other-window)
+ ("M-O"     . facemenu-keymap)
+
  :map emacs-lisp-mode-map
  ("<C-return>" . a/add-elisp-section))
 
@@ -657,7 +658,7 @@ For disabling the behaviour for certain buffers and/or modes."
 (use-feature recentf
   :defer 0.2
   :config
-  (add-to-list 'recentf-exclude "^/\\(?:ssh\\|su\\|sudo\\)?:")
+  ;; (add-to-list 'recentf-exclude "^/\\(?:ssh\\|su\\|sudo\\)?:")
   (setq recentf-max-saved-items 2000))
 
 ;; smart M-x enhancement (needed by counsel for history)
@@ -1659,6 +1660,7 @@ For disabling the behaviour for certain buffers and/or modes."
                                  (list ".*guile-devel.gnu.org" "l.gnu.guile.devel")
                                  (list ".*guile-user.gnu.org" "l.gnu.guile.user")
                                  (list ".*guix-devel.gnu.org" "l.gnu.guix.devel")
+                                 (list ".*help-guix.gnu.org" "l.gnu.guix.help")
                                  (list ".*info-guix.gnu.org" "l.gnu.guix.info")
                                  (list ".*savannah-hackers-public.gnu.org" "l.gnu.savannah.hackers.public")
                                  (list ".*savannah-users.gnu.org" "l.gnu.savannah.users")
@@ -1755,6 +1757,9 @@ For disabling the behaviour for certain buffers and/or modes."
      ("l\\.gnu\\.guix\\.devel"
       (to-address . "guix-devel@gnu.org")
       (to-list    . "guix-devel@gnu.org"))
+     ("l\\.gnu\\.guix\\.help"
+      (to-address . "help-guix@gnu.org")
+      (to-list    . "help-guix@gnu.org"))
      ("l\\.gnu\\.guix\\.info"
       (to-address . "info-guix@gnu.org")
       (to-list    . "info-guix@gnu.org"))
@@ -1890,7 +1895,7 @@ https://csclub.uwaterloo.ca/~abandali/")
            (eval (set (make-local-variable 'message-user-fqdn) "fencepost.gnu.org")))
           ((header "subject" "ThankCRM")
            (to "webmasters-comment@gnu.org")
-           (body "Added  to 2019supporters.html.\n\nMoving to campaigns.\n")
+           (body "")
            (eval (setq a/message-cite-say-hi nil)))
           ("nnimap\\+uw:.*"
            (address "abandali@uwaterloo.ca")
@@ -2124,6 +2129,7 @@ https://csclub.uwaterloo.ca/~abandali/")
 (use-feature erc-track
   :after erc
   :custom
+  (erc-track-enable-keybindings nil)
   (erc-track-exclude-types '("JOIN" "MODE" "NICK" "PART" "QUIT"
                              "324" "329" "332" "333" "353" "477"))
   (erc-track-priority-faces-only 'all)