Add picom config

[~bandali/configs] / .emacs.d / lisp / bandali-erc.el

diff --git a/.emacs.d/lisp/bandali-erc.el b/.emacs.d/lisp/bandali-erc.el
index 41a152c..ed27df3 100644 (file)
--- a/.emacs.d/lisp/bandali-erc.el
+++ b/.emacs.d/lisp/bandali-erc.el
@@ -53,13 +53,15 @@
     (erc-message "PRIVMSG"
                  (format "chanserv op %s %s"
                          (erc-default-target)
     (erc-message "PRIVMSG"
                  (format "chanserv op %s %s"
                          (erc-default-target)

-                         (erc-current-nick)) nil))
+                         (erc-current-nick))
+                 nil))

   (declare-function erc-cmd-DEOP "erc" (&rest people))
   (defun erc-cmd-DEOPME ()
     "Deop myself from current channel."
     (erc-cmd-DEOP (format "%s" (erc-current-nick))))
   (add-to-list 'erc-modules 'keep-place)
   (declare-function erc-cmd-DEOP "erc" (&rest people))
   (defun erc-cmd-DEOPME ()
     "Deop myself from current channel."
     (erc-cmd-DEOP (format "%s" (erc-current-nick))))
   (add-to-list 'erc-modules 'keep-place)

-  (add-to-list 'erc-modules 'notifications)
+  (when (display-graphic-p)
+    (add-to-list 'erc-modules 'notifications))

   (add-to-list 'erc-modules 'smiley)
   (add-to-list 'erc-modules 'spelling)
   (declare-function erc-update-modules "erc")
   (add-to-list 'erc-modules 'smiley)
   (add-to-list 'erc-modules 'spelling)
   (declare-function erc-update-modules "erc")


@@ -94,8 +96,9 @@
   (csetq
    erc-pal-highlight-type 'nick
    erc-pals
   (csetq
    erc-pal-highlight-type 'nick
    erc-pals

-   '("aindilis" "blackbeard" "bremner" "brettgilio" "civodul"
-     "dto" "ggoes" "jrasata" "mplsCorwin" "rwp" "technomancy"))
+   '("aindilis" "blackbeard" "bremner" "~brettgilio?@*" "civodul"
+     "dto" "ggoes" "iank" "jrasata" "mplsCorwin" "quidam" "rwp"
+     "sachac" "sudoman" "technomancy"))

   (with-eval-after-load 'erc-match
     (set-face-attribute
      'erc-pal-face nil
   (with-eval-after-load 'erc-match
     (set-face-attribute
      'erc-pal-face nil


@@ -105,7 +108,7 @@
      :background (face-attribute 'font-lock-string-face :background)))
 
   ;; erc-pcomplete
      :background (face-attribute 'font-lock-string-face :background)))
 
   ;; erc-pcomplete

-  (csetq erc-pcomplete-nick-postfix ", ")
+  (csetq erc-pcomplete-nick-postfix ",")

 
   ;; erc-stamp
   (csetq erc-timestamp-only-if-changed-flag nil
 
   ;; erc-stamp
   (csetq erc-timestamp-only-if-changed-flag nil