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/inline-bots.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/inline-bots.lisp') diff --git a/src/inline-bots.lisp b/src/inline-bots.lisp index f4d8a8d..db9d8ff 100644 --- a/src/inline-bots.lisp +++ b/src/inline-bots.lisp @@ -3,16 +3,16 @@ (defpackage :ukkoclot/src/inline-bots (:documentation "This package deals with removing unwanted inline bot usage") (:use :c2cl :ukkoclot/src/tg) - (:import-from :com.dieggsy.f-string :enable-f-strings) (:import-from :conf) (:import-from :log) + (:import-from :named-readtables :in-readtable) (:import-from :serapeum :->) (:import-from :state) + (:import-from :ukkoclot/src/readtable :readtable) (:local-nicknames (:db :ukkoclot/src/db)) (:export :blacklist-inline-bot :on-inline-bot :whitelist-inline-bot)) (in-package :ukkoclot/src/inline-bots) - -(enable-f-strings) +(in-readtable readtable) (-> blacklist-inline-bot (integer) (values &optional)) (defun blacklist-inline-bot (inline-bot-id) -- cgit v1.2.3