making serapeum not need to overwrite uiop
This commit is contained in:
		
							parent
							
								
									d09f45df2a
								
							
						
					
					
						commit
						cd2109dc4a
					
				
					 1 changed files with 2 additions and 3 deletions
				
			
		| 
						 | 
				
			
			@ -8,8 +8,7 @@
 | 
			
		|||
(require "cl-smtp")
 | 
			
		||||
 | 
			
		||||
(defpackage tfcserver
 | 
			
		||||
  (:use :cl :uiop :com.inuoe.jzon :spinneret)
 | 
			
		||||
  (:shadow :serapeum))
 | 
			
		||||
  (:use :cl :com.inuoe.jzon :spinneret :serapeum))
 | 
			
		||||
 | 
			
		||||
(in-package :tfcserver)
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			@ -115,7 +114,7 @@
 | 
			
		|||
          :do (format t "~&~A" entry))
 | 
			
		||||
    (format t "~&~A" "Let's print out the data")
 | 
			
		||||
    (format t "~&~A" data-list)
 | 
			
		||||
    (println *last-list-data*)
 | 
			
		||||
    (uiop:println *last-list-data*)
 | 
			
		||||
 | 
			
		||||
    (setf data `#(("columnId" 37 "value" ,(serapeum:trim-whitespace
 | 
			
		||||
                                           (cdr (assoc
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue