awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-13 13:13:35 -05:00
Code Issues Packages Projects Releases Wiki Activity

selectrum: refactor +irc/selectrum-jump-to-channel

Browse Source
This commit is contained in:
Itai Y. Efrat
2021-05-21 18:28:38 +03:00
parent 49a5c51615
commit 24f2efd8ca
3 changed files with 32 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
modules/app/irc/autoload/irc.el
View File

@@ -72,6 +72,16 @@ argument) is non-nil only show channels in current server."
((featurep! :completion selectrum) #'+irc/selectrum-jump-to-channel)
((user-error "No jump-to-channel backend is enabled. Enable selectrum or ivy!")))))
;;;###autoload
(defun +irc--circe-all-buffers ()
(cl-loop with servers = (circe-server-buffers)
for server in servers
collect server
nconc
(with-current-buffer server
(cl-loop for buf in (circe-server-chat-buffers)
collect buf))))
;;;###autoload
(defun +irc/tracking-next-buffer ()
"Disables switching to an unread buffer unless in the irc workspace."