about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-06-30 19:32:56 -0500
committerCase Duckworth2021-06-30 19:32:56 -0500
commitbe228e03c513e59b0c1976538831e44dfd475dcd (patch)
tree58d5259d94e78b5059ca91cca755a6408539f838
parentMerge branch 'main' of tildegit.org:acdw/emacs (diff)
downloademacs-be228e03c513e59b0c1976538831e44dfd475dcd.tar.gz
emacs-be228e03c513e59b0c1976538831e44dfd475dcd.zip
Switch prefix with erc-switch-to-buffer
-rw-r--r--init.el2
-rw-r--r--lisp/acdw-erc.el9
2 files changed, 11 insertions, 0 deletions
diff --git a/init.el b/init.el index 7d32117..a49f107 100644 --- a/init.el +++ b/init.el
@@ -296,6 +296,8 @@
296 erc-track-mode 296 erc-track-mode
297 erc-truncate-mode) 297 erc-truncate-mode)
298 298
299 (:bind "C-c C-b" acdw-erc/erc-switch-to-buffer)
300
299 ;; (setup (:straight erc-hl-nicks) 301 ;; (setup (:straight erc-hl-nicks)
300 ;; (with-eval-after-load 'erc 302 ;; (with-eval-after-load 'erc
301 ;; (require 'erc-hl-nicks) 303 ;; (require 'erc-hl-nicks)
diff --git a/lisp/acdw-erc.el b/lisp/acdw-erc.el index 8cf9734..f62e731 100644 --- a/lisp/acdw-erc.el +++ b/lisp/acdw-erc.el
@@ -101,5 +101,14 @@ If USE-TLS is non-nil, use TLS."
101 (apply #'concat ss)) 101 (apply #'concat ss))
102 name)))) 102 name))))
103 103
104
105;;; Uh
106
107(defun acdw-erc/erc-switch-to-buffer (&optional arg)
108 "Prompt for ERC buffer to switch to.
109Reverse prefix argument from `erc-switch-to-buffer'."
110 (interactive "P")
111 (erc-switch-to-buffer (not arg)))
112
104(provide 'acdw-erc) 113(provide 'acdw-erc)
105;;; acdw-erc.el ends here 114;;; acdw-erc.el ends here