xB: fix up the special IPC command's name

To reflect the new disorder.
This commit is contained in:
2021-08-06 17:14:13 +02:00
parent 50057d5149
commit 5d285ffb96
11 changed files with 30 additions and 28 deletions

View File

@@ -77,7 +77,7 @@
(substring line 0 (- len 1)) line))))
(define (get-config name)
(send "ZYKLONB get_config :" name)
(send "XB get_config :" name)
(car (message-params (parse-message (get-line-crlf irc-input-port)))))
(define (extract-nick prefix)
@@ -216,7 +216,7 @@
; --- Main loop ----------------------------------------------------------------
(define prefix (get-config "prefix"))
(send "ZYKLONB register")
(send "XB register")
(define (process msg)
(when (string-ci=? (message-command msg) "PRIVMSG")