anchor.diff:    (mapcar #'(lambda (x)
   	      (item-picture x))
   	  (invoice-item-list invoice)))
  +
  +(define-easy-handler (checkinlist :uri "/checkinlist") ()
  +  (standard-page (:title "Check in list")
  +    (standard-check-in-showlist)))
   
   (define-easy-handler (createpdf :uri "/createpdf") ()
     (let* ((invoice (find-invoice-from-cookie (cookie-in "current-invoice")))
  
positive.code: 		    (dolist (image ,image-list)
  		      (htm (:div :class "col-md-3 col-sm-4 col-xs-6"
  				 (:img :src image :class "img-responsive"))))))))
  
  (defmacro standard-item-list-table (&key invoice)
    `(with-html-output (*standard-output* nil :indent t)
       (:div :class "container panel panel-default"
  
negative.code: 	:cl-who
  	:cl-pass
  	:hunchentoot
  	:parenscript
  	:trivial-shell))
  
  (defvar *current-message-list* '())
  (defvar *global-invoice-list* '())
  