anchor.diff:  	 (item-price (hunchentoot:post-parameter "item-price"))
   	 (item-qty (hunchentoot:post-parameter "item-qty"))
   	 (item (first (remove-if-not #'(lambda (x)
  -							 (and (string= (item-description x) item-desc)
  -							      (string= (item-price x) item-price)
  -							      (string= (item-quantity x) item-qty))) (invoice-item-list invoice)))))
  +					 (and (string= (item-description x) item-desc)
  +					      (string= (item-price x) item-price)
  +					      (string= (item-quantity x) item-qty))) (invoice-item-list invoice)))))
   
       
  -	   (multiple-value-bind
  -		 (second minute hour date month year)
  -	       (get-decoded-time)
  -	     (setf (item-returned-on item)
  -		   (format nil "~d/~d" month date)))
  +    (multiple-value-bind
  +	  (second minute hour date month year)
  +	(get-decoded-time)
  +      (setf (item-returned-on item)
  +	    (format nil "~d/~d" month date)))
       (createpdf2)
  -  (redirect "/check-in-set")))
  +    (redirect "/check-in-set")))
   
   ;;;This function has some leftover cruft that needs to be refactored.
   (define-easy-handler (displayimagegot :uri "/displayimagegot") ()
     (let ((whatever (loop for post-parameter in (hunchentoot:post-parameters*)
   		     if (equal (car post-parameter) "picture-batch")
  -				    collect post-parameter)))
  +		     collect post-parameter)))
       (standard-page (:title "Picture Batch")
         (mapc #'(lambda (x)
   		(rename-file (second x)
   			     (concatenate 'string "/tmp/"
   					  (third x)) :if-exists :supersede)
   		(move-image-to-invoice-dir x))
  -		     
  +	    
   	    whatever)))
     (redirect "/setthemcookies"))
   
   ;;;Current solution to being able to refresh pages without putting data in the URI
   ;;;May need to start putting data in the URI but the function works pretty decently already.
   (define-easy-handler (pre-set-cookies :uri "/pre-set-cookies") (showname setname)
  -   (set-cookie "current-invoice" :value (concatenate 'string showname "-" setname))
  -						 
  +  (set-cookie "current-invoice" :value (concatenate 'string showname "-" setname))
  +  
     (redirect "/setthemcookies"))
   
   ;;;Adds an item from the additem panel on the write order page
  
positive.code: 
  (conspack:defencoding item
    price quantity description invoices-on picture shows-on returned-on)
    
  (defun save-data ()
    (let* ((saved-list (mapcar #'conspack:encode-object (invoice-item-list (car *GLOBAL-INVOICE-LIST*)))))
  			    
          
      (with-open-file (out "caps.db"
  			 :direction :output
  			 :if-exists :supersede)
  
negative.code:       
        (fresh-line s)
        (fresh-line s)
        
        (princ date-header s)
        (princ rental-period s)
        (fresh-line s)
  