From 34616341d8bd585ffe1afc4c3827307f7ede844e Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Wed, 15 Dec 2021 14:05:13 +0100 Subject: [PATCH] Move erc settings to bundle--irc --- bundle/bundle--irc.el | 41 +++++++++++++++++++++++++++++++++++++++ bundle/bundle--mk.el | 7 ------- bundle/bundle--package.el | 36 ++-------------------------------- 3 files changed, 43 insertions(+), 41 deletions(-) create mode 100644 bundle/bundle--irc.el diff --git a/bundle/bundle--irc.el b/bundle/bundle--irc.el new file mode 100644 index 00000000..119938db --- /dev/null +++ b/bundle/bundle--irc.el @@ -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")) diff --git a/bundle/bundle--mk.el b/bundle/bundle--mk.el index 1341ef9b..5d5989c5 100644 --- a/bundle/bundle--mk.el +++ b/bundle/bundle--mk.el @@ -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." diff --git a/bundle/bundle--package.el b/bundle/bundle--package.el index 16c52a97..039d31a6 100644 --- a/bundle/bundle--package.el +++ b/bundle/bundle--package.el @@ -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")