From e0dc4e6d002a9ba08a8353e9df2955c517a6fdf0 Mon Sep 17 00:00:00 2001 From: plugd Date: Sun, 18 Jul 2021 20:34:29 +0200 Subject: [PATCH] Fixed error in quit command definition. --- lurk.el | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) 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) -- 2.20.1