2017-06-11 01:49:39 +02:00
|
|
|
;;; app/irc/autoload/email.el -*- lexical-binding: t; -*-
|
|
|
|
|
|
|
|
;;;###autoload
|
|
|
|
(defun =irc ()
|
|
|
|
"Connect to IRC."
|
|
|
|
(interactive)
|
|
|
|
(call-interactively #'circe))
|
|
|
|
|
|
|
|
;;;###autoload
|
|
|
|
(defun +irc/connect-all ()
|
|
|
|
"Connect to all `:irc' defined servers."
|
|
|
|
(interactive)
|
|
|
|
;; force a library load for +irc--accounts
|
|
|
|
(circe--version)
|
2017-06-11 16:09:09 +02:00
|
|
|
(cl-loop for network in +irc--accounts
|
|
|
|
collect (circe (car network))))
|
2017-06-11 01:49:39 +02:00
|
|
|
|