guix: switch to us basic layout instead of us altgr-intl

[~bandali/configs] / .emacs.d / init.el

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 21847d8..4998cd8 100644 (file)
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -1699,6 +1699,8 @@ For disabling the behaviour for certain buffers and/or modes."
                                  (list ".*emacs-orgmode.gnu.org" "l.gnu.emacs.orgmode")
                                  (list ".*emacs-tangents.gnu.org" "l.gnu.emacs.tangents")
                                  (list ".*emacsconf-discuss.gnu.org" "l.gnu.emacsconf.discuss")
+                                 (list ".*emacsconf-register.gnu.org" "l.gnu.emacsconf.register")
+                                 (list ".*emacsconf-submit.gnu.org" "l.gnu.emacsconf.submit")
                                  (list ".*fencepost-users.gnu.org" "l.gnu.fencepost.users")
                                  (list ".*gnunet-developers.gnu.org" "l.gnu.gnunet.developers")
                                  (list ".*help-gnunet.gnu.org" "l.gnu.gnunet.help")
@@ -1725,6 +1727,7 @@ For disabling the behaviour for certain buffers and/or modes."
                                  (list ".*dev.lists.parabola.nu" "l.parabola.dev")
                                  ;; *@lists.sr.ht
                                  (list ".*~bandali/public-inbox@lists.sr.ht" "l.~bandali.public-inbox")
+                                 (list ".*~sircmpwn/free-writers-club@lists.sr.ht" "l.~sircmpwn.free-writers-club")
                                  (list ".*~sircmpwn/sr.ht-admins@lists.sr.ht" "l.~sircmpwn.srht.admins")
                                  (list ".*~sircmpwn/sr.ht-announce@lists.sr.ht" "l.~sircmpwn.srht.announce")
                                  (list ".*~sircmpwn/sr.ht-dev@lists.sr.ht" "l.~sircmpwn.srht.dev")
@@ -1779,6 +1782,12 @@ For disabling the behaviour for certain buffers and/or modes."
      ("l\\.gnu\\.emacsconf\\.discuss"
       (to-address . "emacsconf-discuss@gnu.org")
       (to-list    . "emacsconf-discuss@gnu.org"))
+     ("l\\.gnu\\.emacsconf\\.register"
+      (to-address . "emacsconf-register@gnu.org")
+      (to-list    . "emacsconf-register@gnu.org"))
+     ("l\\.gnu\\.emacsconf\\.submit"
+      (to-address . "emacsconf-submit@gnu.org")
+      (to-list    . "emacsconf-submit@gnu.org"))
      ("l\\.gnu\\.fencepost\\.users"
       (to-address . "fencepost-users@gnu.org")
       (to-list    . "fencepost-users@gnu.org")
@@ -1844,6 +1853,9 @@ For disabling the behaviour for certain buffers and/or modes."
      ("l\\.~bandali\\.public-inbox"
       (to-address . "~bandali/public-inbox@lists.sr.ht")
       (to-list    . "~bandali/public-inbox@lists.sr.ht"))
+     ("l\\.~sircmpwn\\.free-writers-club"
+      (to-address . "~sircmpwn/free-writers-club@lists.sr.ht")
+      (to-list    . "~sircmpwn/free-writers-club@lists.sr.ht"))
      ("l\\.~sircmpwn\\.srht\\.admins"
       (to-address . "~sircmpwn/sr.ht-admins@lists.sr.ht")
       (to-list    . "~sircmpwn/sr.ht-admins@lists.sr.ht"))
@@ -1931,14 +1943,18 @@ For disabling the behaviour for certain buffers and/or modes."
 Free Software Activist | GNU Webmaster & Volunteer
 GPG: BE62 7373 8E61 6D6D 1B3A  08E8 A21A 0202 4881 6103
 https://shemshak.org/~amin")
+  (defvar mab/gnu-signature "Amin Bandali
+Free Software Activist | GNU Webmaster & Volunteer
+GPG: BE62 7373 8E61 6D6D 1B3A  08E8 A21A 0202 4881 6103
+https://bandalis.org")
   (defvar mab/uw-signature "Amin Bandali, MMath Student
 Cheriton School of Computer Science
 University of Waterloo
-https://shemshak.org/~amin")
+https://bandalis.org")
   (defvar mab/csc-signature "Amin Bandali
 Termcom, Computer Science Club
 University of Waterloo
-https://shemshak.org/~amin")
+https://bandalis.org")
   (setq gnus-posting-styles
         '((".*"
            (address "amin@shemshak.org")
@@ -1947,7 +1963,7 @@ https://shemshak.org/~amin")
            (eval (setq mab/message-cite-say-hi t)))
           ("nnimap\\+gnu:.*"
            (address "bandali@gnu.org")
-           (organization "GNU Project")
+           (signature mab/gnu-signature)
            (eval (set (make-local-variable 'message-user-fqdn) "fencepost.gnu.org")))
           ((header "subject" "ThankCRM")
            (to "webmasters-comment@gnu.org")
@@ -1955,13 +1971,11 @@ https://shemshak.org/~amin")
            (eval (setq mab/message-cite-say-hi nil)))
           ("nnimap\\+uw:.*"
            (address "abandali@uwaterloo.ca")
-           (organization "University of Waterloo")
            (signature mab/uw-signature))
           ("nnimap\\+uw:INBOX"
            (gcc "\"nnimap+uw:Sent Items\""))
           ("nnimap\\+csc:.*"
            (address "abandali@csclub.uwaterloo.ca")
-           (organization "Computer Science Club, University of Waterloo")
            (signature mab/csc-signature)
            (gcc "nnimap+csc:Sent")))))
 
@@ -2153,6 +2167,7 @@ https://shemshak.org/~amin")
   (erc-join-buffer 'bury)
   (erc-lurker-hide-list '("JOIN" "PART" "QUIT"))
   (erc-nick "bandali")
+  (erc-prompt "erc>")
   (erc-rename-buffers t)
   (erc-server-reconnect-attempts 5)
   (erc-server-reconnect-timeout 3)