From db402312caadb6e6e069ca367fcac9a9d37757b2 Mon Sep 17 00:00:00 2001
From: eta <eta@theta.eu.org>
Date: Thu, 13 Aug 2020 21:52:52 +0100
Subject: [PATCH] delete extra close-paren

---
 stuff.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/stuff.lisp b/stuff.lisp
index 35a2445..efde378 100644
--- a/stuff.lisp
+++ b/stuff.lisp
@@ -226,7 +226,7 @@ MEDIA-TYPE is one of (:image :video :audio :document)."
                        (format *debug-io* "~&upload failed! status ~A, body ~A~%" status-code body)
                        (error "HTTP upload failed with status ~A" status-code))
                      get-url))))
-             :name "whatsapp media download thread"))))))))
+             :name "whatsapp media download thread")))))))
 
 (defun send-qrcode (comp jid text)
   "Send a QR code containing TEXT to JID."