From 6b355568b075c1cb90c622299c4edba4e65e98dd Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Tue, 25 Jan 2022 16:55:44 -0600 Subject: Customize jabber --- init.el | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) (limited to 'init.el') diff --git a/init.el b/init.el index ed7252e..fe5630a 100644 --- a/init.el +++ b/init.el @@ -1318,11 +1318,21 @@ See also `crux-reopen-as-root-mode'." "jabber-pkg.el") :fork (:repo "https://tildegit.org/acdw/emacs-jabber" :host nil))) + (:also-load +jabber) + (:option jabber-account-list '(("acdw@hmm.st")) + jabber-groupchat-buffer-format "%n" + jabber-chat-buffer-format "%n" + jabber-muc-private-buffer-format "%n (%g)" + jabber-activity-show-p #'ignore) (dolist (mode '(jabber-chat-mode jabber-browse-mode jabber-roster-mode jabber-console-mode)) - (add-hook (intern (format "%s-hook" mode)) #'visual-fill-column-mode))) + (add-hook (intern (format "%s-hook" mode)) #'visual-fill-column-mode)) + (add-hook 'jabber-activity-mode-hook 'tracking-mode) + (:+leader "C-j" jabber-global-keymap) + (advice-add 'jabber-activity-add :after #'+jabber-tracking-add) + (advice-add 'jabber-activity-add-muc :after #'+jabber-tracking-add-muc)) (setup (:straight-when keychain-environment (executable-find "keychain")) -- cgit 1.4.1-21-gabe81