From 69d775b3d3a8f5bdb920630c7bdf6ec1b264b203 Mon Sep 17 00:00:00 2001
From: Uko Kokņevičs
Date: Fri, 24 Oct 2025 08:09:46 +0300
Subject: Configure a custom readtable explicitly

---
 src/tg/method-macros.lisp | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'src/tg/method-macros.lisp')

diff --git a/src/tg/method-macros.lisp b/src/tg/method-macros.lisp
index 9ab9e89..17903df 100644
--- a/src/tg/method-macros.lisp
+++ b/src/tg/method-macros.lisp
@@ -4,16 +4,15 @@
   (:documentation "Macros for easy defining TG methods.")
   (:use :c2cl :iterate)
   (:import-from :alexandria :make-keyword :with-gensyms)
-  (:import-from :com.dieggsy.f-string :enable-f-strings)
+  (:import-from :named-readtables :in-readtable)
   (:import-from :serapeum :-> :take)
   (:import-from :state)
   (:import-from :str)
+  (:import-from :ukkoclot/src/readtable :readtable)
   (:import-from :ukkoclot/src/transport :do-call :http-method)
   (:export :define-tg-method))
 (in-package :ukkoclot/src/tg/method-macros)
-
-(eval-when (:compile-toplevel :load-toplevel :execute)
-  (enable-f-strings))
+(in-readtable readtable)
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (defstruct (param (:constructor make-param%)) name type default skip-if-default)
-- 
cgit v1.2.3