From 9e7c8dfab25da9beb86fd4ed4115895eedb4c8ab Mon Sep 17 00:00:00 2001
From: Uko Kokņevičs
Date: Sat, 18 Oct 2025 08:42:44 +0300
Subject: Replace bunch of our string utilities with str library

---
 src/serializing.lisp | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'src/serializing.lisp')

diff --git a/src/serializing.lisp b/src/serializing.lisp
index 205190f..71b0fb2 100644
--- a/src/serializing.lisp
+++ b/src/serializing.lisp
@@ -3,7 +3,7 @@
 (defpackage :ukkoclot/serializing
   (:use :c2cl :iterate)
   (:import-from :log)
-  (:import-from :ukkoclot/strings :lisp->snake-case)
+  (:import-from :str)
   (:local-nicknames
    (:jzon :com.inuoe.jzon))
   (:export :fixup-args :fixup-value :parse-value :try-parse-value))
@@ -11,9 +11,7 @@
 
 (defun fixup-args (args)
   (iter (for (key . value) in args)
-        (collect
-            (cons (string-downcase (lisp->snake-case (symbol-name key)))
-                  (fixup-value value)))))
+        (collect (cons (str:snake-case key) (fixup-value value)))))
 
 (defgeneric fixup-value (value)
   (:documentation "Fixup outgoing *top-level* `value' before passing it to telegram.")
-- 
cgit v1.2.3