Add set-irc-server! autodef & move :irc setting
This commit is contained in:
parent
e91af20003
commit
2ad1280e4e
2 changed files with 16 additions and 5 deletions
16
modules/app/irc/autoload/settings.el
Normal file
16
modules/app/irc/autoload/settings.el
Normal file
|
@ -0,0 +1,16 @@
|
||||||
|
;;; app/irc/autoload/settings.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
|
;;;###autodef
|
||||||
|
(defun set-irc-server! (server letvars)
|
||||||
|
"Registers an irc SERVER for circe.
|
||||||
|
|
||||||
|
See `circe-network-options' for details."
|
||||||
|
(after! circe
|
||||||
|
(push (cons server letvars) circe-network-options)))
|
||||||
|
|
||||||
|
;; FIXME obsolete :irc
|
||||||
|
;;;###autoload
|
||||||
|
(def-setting! :irc (server letvars)
|
||||||
|
:obsolete set-irc-server!
|
||||||
|
`(after! circe
|
||||||
|
(push (cons ,server ,letvars) circe-network-options)))
|
|
@ -36,11 +36,6 @@ See `circe-notifications-watch-strings'.")
|
||||||
Useful for ZNC users who want to avoid the deluge of notifications during buffer
|
Useful for ZNC users who want to avoid the deluge of notifications during buffer
|
||||||
playback.")
|
playback.")
|
||||||
|
|
||||||
(def-setting! :irc (server letvars)
|
|
||||||
"Registers an irc server for circe."
|
|
||||||
`(after! circe
|
|
||||||
(push (cons ,server ,letvars) circe-network-options)))
|
|
||||||
|
|
||||||
(defvar +irc--defer-timer nil)
|
(defvar +irc--defer-timer nil)
|
||||||
|
|
||||||
(defsubst +irc--pad (left right)
|
(defsubst +irc--pad (left right)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue