X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?a=blobdiff_plain;f=murk.el;h=e67d8e61fa361b53a4551e85d946848c192f5ecc;hb=0a919f36d688bb2495321b46705e5ad39a0a9175;hp=0766b7d020a9c81ee4e2ea6d0ed6f0863c89cbe4;hpb=2d5b239d6b1b43beec02e7b0b2612772e2d1e316;p=lurk.git diff --git a/murk.el b/murk.el index 0766b7d..e67d8e6 100644 --- a/murk.el +++ b/murk.el @@ -939,8 +939,8 @@ The head of this list is always the current context.") (when (and (or (not target-server) (and (equal server target-server))) (murk--lists-equal (cdr matcher) - (append (list (lurk-msg-src msg) - (lurk-msg-cmd msg)) + (append (list (murk-msg-src msg) + (murk-msg-cmd msg)) (murk-msg-params msg)))) (murk-send-msg server (murk-msg nil nil (car reply) (cdr reply))))))) @@ -1135,7 +1135,7 @@ The head of this list is always the current context.") (let ((server (murk-context-server ctx)) (nick (car params))) (murk-send-msg server - (lurk-msg nil nil "PRIVMSG" + (murk-msg nil nil "PRIVMSG" (list nick "\01VERSION\01"))) (murk-display-notice ctx "CTCP version request sent to " nick " on " server))