Move erc settings to bundle--irc

This commit is contained in:
Marcus Kammer 2021-12-15 14:05:13 +01:00
parent 3c9e4c1adb
commit 34616341d8
Signed by: marcuskammer
GPG key ID: C374817BE285268F
3 changed files with 43 additions and 41 deletions

41
bundle/bundle--irc.el Normal file
View file

@ -0,0 +1,41 @@
(use-package erc
:custom
(erc-track-shorten-start 8)
(erc-kill-buffer-on-part t)
(erc-auto-query 'bury)
(erc-hide-list '("JOIN" "PART" "QUIT"))
(erc-network-hide-list '(("irc.libera.chat" "JOIN" "PART" "QUIT")))
(erc-channel-hide-list '(("#emacs" "JOIN" "PART" "QUIT")))
(erc-rename-buffers t)
(erc-autojoin-channels-alist '(("libera.chat" "#emacs")))
(erc-interpret-mirc-color t)
(erc-modules '(autojoin
button
completion
fill
irccontrols
list
match
menu
move-to-prompt
netsplit
networks
noncommands
notifications
readonly
ring
stamp
track
truncate)))
(use-package erc-image
:after erc
:custom (erc-image-inline-rescale 300)
:config (add-to-list 'erc-modules 'image))
(defun start-irc (nick)
(interactive "sTell me your nick please: ")
(erc-tls :server "irc.libera.chat"
:port 6697
:nick nick
:full-name "emacs-user"))

View file

@ -57,13 +57,6 @@
(interactive "nTransparency Value 0 - 100 opaque: ")
(set-frame-parameter (selected-frame) 'alpha value))
(defun start-irc (nick)
(interactive "sTell me your nick please: ")
(erc-tls :server "irc.libera.chat"
:port 6697
:nick nick
:full-name "emacs-user"))
(defun me/org-copy-subtree-contents ()
"Get the content text of the subtree at point and add it to the `kill-ring'.
Excludes the heading and any child subtrees."

View file

@ -293,40 +293,6 @@
;; :after (slime company)
;; :custom (slime-company-after-completion 'slime-company-just-one-space))
(use-package erc
:custom
(erc-track-shorten-start 8)
(erc-kill-buffer-on-part t)
(erc-auto-query 'bury)
(erc-hide-list '("JOIN" "PART" "QUIT"))
(erc-network-hide-list '(("irc.libera.chat" "JOIN" "PART" "QUIT")))
(erc-channel-hide-list '(("#emacs" "JOIN" "PART" "QUIT")))
(erc-rename-buffers t)
(erc-autojoin-channels-alist '(("libera.chat" "#emacs")))
(erc-interpret-mirc-color t)
(erc-modules '(autojoin
button
completion
fill
irccontrols
list
match
menu
move-to-prompt
netsplit
networks
noncommands
notifications
readonly
ring
stamp
track
truncate)))
(use-package erc-image
:after erc
:custom (erc-image-inline-rescale 300)
:config (add-to-list 'erc-modules 'image))
(use-package emojify
:hook (erc-mode . emojify-mode)
@ -452,3 +418,5 @@
(use-package yaml-mode)
(use-package elpher)
(load "bundle--irc")