From 3dfc833aceadbccbbbd0b88ab57560e4fb502a1b Mon Sep 17 00:00:00 2001
From: Uko Kokņevičs
Date: Sat, 18 Oct 2025 02:01:23 +0300
Subject: Fix an infinite recursion...

---
 src/tg/get-me.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/tg/get-me.lisp b/src/tg/get-me.lisp
index e4a6de5..d08fb0e 100644
--- a/src/tg/get-me.lisp
+++ b/src/tg/get-me.lisp
@@ -9,7 +9,7 @@
 (define-tg-method (get-me% user :GET))
 
 (defun get-me (bot)
-  (let ((me (get-me bot)))
+  (let ((me (get-me% bot)))
     (setf (bot-id% bot) (user-id me))
     (setf (bot-username% bot) (user-username me))
     me))
-- 
cgit v1.2.3