diff options
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 74 |
1 files changed, 16 insertions, 58 deletions
@@ -2449,9 +2449,10 @@ ;;; Chats ;;;; circe -(defvar jao-libera-channels '()) -(defvar jao-oftc-channels '()) -(defvar jao-bitlbee-channels '()) +(defvar jao-libera-channels ()) +(defvar jao-oftc-channels ()) +(defvar jao-bitlbee-channels ()) +(defvar jao-slack-channels ()) (use-package circe :ensure t @@ -2516,6 +2517,10 @@ (circe-display-server-message (format "%d nicks in this channel" (jao-circe-nick-no)))) + (defun circe-command-SENDFILE (line) + "/sendfile for localslackirc" + (circe-command-QUOTE (format "sendfile %s" line))) + (advice-add 'circe-command-NAMES :after #'circe-command-NNICKS) (setq circe-network-options @@ -2529,7 +2534,10 @@ (jao-with-auth "bitlbee" u p (list "Bitlbee" :host "127.0.0.1" :nick u :channels jao-bitlbee-channels :lagmon-disabled t - :nickserv-password u :user p)))) + :nickserv-password u :user p)) + (list "localslack" :host "127.0.0.1" :nick "jao" + :channels jao-slack-channels :port 9007 + :lagmon-disabled t))) (jao-shorten-modes 'circe-channel-mode 'circe-server-mode @@ -2539,57 +2547,6 @@ (enable-lui-track) (circe-lagmon-mode)) -;;;; slack -(eval-and-compile - (defvar jao-slack-dir (expand-file-name "emacs-slack" jao-local-lisp-dir))) - -(use-package slack - :commands (slack-start) - :vc t - :load-path jao-slack-dir - :init - (setq slack-alert-icon (jao-data-file "slack.svg") - slack-buffer-emojify nil - slack-buffer-create-on-notify t - slack-display-team-name t - slack-typing-visibility 'buffer ;; 'never, 'buffer, 'frame - slack-thread-also-send-to-room t - slack-profile-image-file-directory "/tmp/slack-imgs/" - slack-image-file-directory "/tmp/slack-imgs/" - slack-file-dir "~/var/download/slack/" - slack-prefer-current-team t - slack-message-tracking-faces '(warning) - slack-log-level 'warn - slack-message-custom-notifier (lambda (_msg room _team) room)) - :bind (:map slack-mode-map (("@" . slack-message-embed-mention) - ("#" . slack-message-embed-channel)) - :map slack-message-buffer-mode-map - (("C-c C-e" . slack-message-edit) - ("C-c C-a" . slack-file-upload))) - :hook ((slack-file-info-buffer-mode . view-mode)) - :config - - (defun my-slack-nobreak-mrkdwn () - "Return non-nil (don't break line) if point is in markdown code face." - (seq-find (lambda (ov) - (eq 'slack-mrkdwn-code-block-face (overlay-get ov 'face))) - (overlays-at (point)))) - (add-hook 'slack-message-buffer-mode-hook - (lambda () - (add-hook 'fill-nobreak-predicate #'my-slack-nobreak-mrkdwn - nil 'local))) - - (dolist (f (list slack-file-dir slack-image-file-directory)) - (when (not (file-exists-p f)) (make-directory f))) - - (jao-shorten-modes 'slack-message-buffer-mode - 'slack-thread-message-buffer-mode) - (jao-tracking-faces 'warning) - (jao-tracking-cleaner "logstash-\\([^-]+\\)-\\(.+\\)" "\\2-\\1") - (jao-tracking-cleaner - "^\\*Slack - .*? : \\(MPIM: \\)?\\([^ ]+\\)\\( \\(T\\)\\)?.*" "\\2\\4") - (jao-define-attached-buffer "\\*Slack .+ Edit Message [0-9].+" 20)) - ;;;; telegram (use-package telega :ensure t @@ -2687,8 +2644,6 @@ ;;;; startup (defun jao-chats (&optional p) (interactive "P") - (when (or p (y-or-n-p "Connect to slack? ")) - (slack-start)) (when (or p (y-or-n-p "Connect to telegram? ")) (telega)) (when (and (fboundp 'ement-connect) (or p (y-or-n-p "Connect to matrix? "))) @@ -2698,7 +2653,10 @@ (mastodon)) (when (or p (y-or-n-p "Connect to libera? ")) (unless (get-buffer "irc.libera.chat:6697") - (circe "Libera Chat")))) + (circe "Libera Chat"))) + (when (or p (y-or-n-p "Connect to localslack? ")) + (unless (get-buffer "127.0.0.1:9007") + (circe "localslack")))) (defun jao-all-chats () (interactive) |