(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)))))))
(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))