Tweak ERC settings, including enabling logging
[~bandali/configs] / .emacs.d / lisp / bandali-erc.el
index ed27df3..1670af6 100644 (file)
   (csetq
    erc-auto-query 'bury
    erc-autojoin-domain-only nil
-   erc-dcc-get-default-directory (b/var "erc/dcc/")
+   erc-dcc-get-default-directory (b/var "erc/dcc")
+   erc-email-userid "bandali"
    erc-format-nick-function 'erc-format-@nick
    erc-join-buffer 'bury
-   erc-log-channels-directory (b/var "erc/log-channels/")
    erc-lurker-hide-list '("JOIN" "PART" "QUIT")
    erc-nick "bandali"
    erc-prompt "erc>"
    erc-prompt-for-password nil
+   erc-query-display 'buffer
    erc-rename-buffers t
    erc-server-reconnect-attempts 5
    erc-server-reconnect-timeout 3)
     "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 'log)
   (when (display-graphic-p)
-    (add-to-list 'erc-modules 'notifications))
-  (add-to-list 'erc-modules 'smiley)
+    (add-to-list 'erc-modules 'notifications)
+    (add-to-list 'erc-modules 'smiley))
   (add-to-list 'erc-modules 'spelling)
   (declare-function erc-update-modules "erc")
   (erc-update-modules)
 
-  (set-face-attribute
-   'erc-nick-default-face nil
-   ;; :weight 'semibold
-   ;; :background "#f2f2f2"
-   ;; :foreground "#222222"
-   :weight 'bold
-   :background "#f8f8f8"
-   :foreground "#6a6a6a")
+  ;; (set-face-attribute
+  ;;  'erc-nick-default-face nil
+  ;;  ;; :weight 'semibold
+  ;;  ;; :background "#f2f2f2"
+  ;;  ;; :foreground "#222222"
+  ;;  :weight 'bold
+  ;;  :background "#f8f8f8"
+  ;;  :foreground "#6a6a6a")
 
   ;; (set-face-attribute
   ;;  'erc-notice-face nil
   ;; to disable:
   ;; (erc-fill-mode -1)
 
+  ;; erc-log
+  (csetq
+   ;; erc-enable-logging 'erc-log-all-but-server-buffers
+   erc-generate-log-file-name-function 'erc-generate-log-file-name-with-date
+   erc-log-channels-directory (b/var "erc/logs")
+   erc-log-file-coding-system 'utf-8
+   erc-log-write-after-insert t
+   erc-log-write-after-send t
+   erc-save-buffer-on-part nil
+   erc-save-queries-on-quit nil)
+
   ;; erc-match
   (csetq
    erc-pal-highlight-type 'nick
    erc-pals
-   '("aindilis" "blackbeard" "bremner" "~brettgilio?@*" "civodul"
-     "dto" "ggoes" "iank" "jrasata" "mplsCorwin" "quidam" "rwp"
-     "sachac" "sudoman" "technomancy"))
+   '("bremner" "^gopar" "^iank" "quidam" "^rwp" "sudoman"
+     "technomancy" "thomzane"))
   (with-eval-after-load 'erc-match
     (set-face-attribute
      'erc-pal-face nil
      :foreground 'unspecified
      :weight 'unspecified
      :inherit 'erc-nick-default-face
-     :background (face-attribute 'font-lock-string-face :background)))
+     ;; :background (face-attribute 'font-lock-string-face :background)
+     :background "#ffffdf"))
 
   ;; erc-pcomplete
   (csetq erc-pcomplete-nick-postfix ",")