From: plugd Date: Sun, 18 Jul 2021 18:34:29 +0000 (+0200) Subject: Fixed error in quit command definition. X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?a=commitdiff_plain;h=e0dc4e6d002a9ba08a8353e9df2955c517a6fdf0;p=lurk.git Fixed error in quit command definition. --- diff --git a/lurk.el b/lurk.el index d969376..fb0178c 100644 --- a/lurk.el +++ b/lurk.el @@ -903,10 +903,6 @@ in which case they match anything.") " " (number-to-string port) "]"))) (lurk-display-notice nil "(Modify the `lurk-networks' variable to add more.)")) -(defun lurk-command-quit (params) - (let ((quit-msg (if params (string-join params " ") nil))) - (lurk-send-msg (lurk-msg nil nil "QUIT" quit-msg)))) - (defun lurk-command-part (params) (let ((channel (if params (car params) lurk-current-context))) (if channel @@ -922,7 +918,7 @@ in which case they match anything.") (lurk-display-notice nil "Usage: /version "))) (defun lurk-command-quit (params) - (let ((quit-msg (if params (string-join parms " ") lurk-default-quit-msg))) + (let ((quit-msg (if params (string-join params " ") lurk-default-quit-msg))) (lurk-send-msg (lurk-msg nil nil "QUIT" quit-msg)))) (defun lurk-command-nick (params)