TFC/tfcconnection-zola
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

making serapeum not need to overwrite uiop

Browse source
This commit is contained in:
Chris Cochrun 2023-12-13 10:43:18 -06:00
parent d09f45df2a
commit cd2109dc4a
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/main.lisp
View file

@ -8,8 +8,7 @@
(require "cl-smtp") (require "cl-smtp")
(defpackage tfcserver (defpackage tfcserver
(:use :cl :uiop :com.inuoe.jzon :spinneret) (:use :cl :com.inuoe.jzon :spinneret :serapeum))
(:shadow :serapeum))
(in-package :tfcserver) (in-package :tfcserver)
@ -115,7 +114,7 @@
:do (format t "~&~A" entry)) :do (format t "~&~A" entry))
(format t "~&~A" "Let's print out the data") (format t "~&~A" "Let's print out the data")
(format t "~&~A" data-list) (format t "~&~A" data-list)
(println *last-list-data*) (uiop:println *last-list-data*)
(setf data `#(("columnId" 37 "value" ,(serapeum:trim-whitespace (setf data `#(("columnId" 37 "value" ,(serapeum:trim-whitespace
(cdr (assoc (cdr (assoc