((and "NICK"
(guard (equal (murk-connection-nick server)
(murk-msg-src msg))))
- (let ((new-nick (car (murk-msg-params msg))))
+ (let ((new-nick (car (murk-msg-params msg)))
+ (old-nick (murk-connection-nick server)))
(murk-set-connection-nick server new-nick)
+ (murk-rename-server-user server old-nick new-nick)
(murk-display-notice nil "Nick set to " new-nick " on " server)))
("NICK"