anchor.diff:  		      (:li :class "list-group-item list-group-item-success" ,show)
   		      (:li :class "list-group-item list-group-item-danger" ,set)
   		      (:li :class "list-group-item list-group-item-success" ,contact)
  -		      (:li :class "list-group-item list-group-item-danger" ,pic-num))))))
  +		      (:li :class "list-group-item list-group-item-danger" ,pic-num))
  +		 (:a :href "/createpdf" (:button :type "submit" :class "btn btn-default btn-sm btn-info"
  +						 "Create PDF"))))))
   
   ;;;Define page handler functions
   
  
positive.code:   (mapcar #'(lambda (x)
  	      (item-picture x))
  	  (invoice-item-list invoice)))
  
  ;;;Need to rewrite so defintions are in the URL for reloading to work
  (define-easy-handler (setthemcookies :uri "/setthemcookies") ()
  
negative.code: 				     :name "invoice" :id "invoice")
  			     (:button :type "submit" :class "btn btn-default btn-sm btn-danger" "Remove")))))))))))
  			     
  (defmacro standard-picture-upload ()
    `(with-html-output (*standard-output* nil :indent t)
       (:div :class "panel panel-default col-md-6 col-md-push-1"
  