Fixed error in quit command definition.
authorplugd <plugd@thelambdalab.xyz>
Sun, 18 Jul 2021 18:34:29 +0000 (20:34 +0200)
committerplugd <plugd@thelambdalab.xyz>
Sun, 18 Jul 2021 18:34:29 +0000 (20:34 +0200)
lurk.el

diff --git a/lurk.el b/lurk.el
index d969376..fb0178c 100644 (file)
--- 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 <nick>")))
 
 (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)