anchor.diff:  	   (if (message-invoice-name messages)
   	       (htm
   		(:div :class "card-action"
  -		      (:a :href "#" "Order Page")
  -		      (:a :href "#" "Show Page")
  -		      (:a :href "#" "Check In Page")))))))))))
  +		      (:a :href "#" "Order")
  +		      (:a :href "#" "Show")
  +		      (:a :href "#" "Check In")))))))))))
   
   
   (defmacro standard-item-writeup (&key image full-images invoice-data)
  
positive.code: 		    :rel "stylesheet"
  		    :href "css/materialize.min.css")
  	     (:script :src "js/jquery.js")
  	     (:script :src "js/ajax-item.js")
  	     (:script :src "js/materialize.min.js")
  	     (:link :href "https://fonts.googleapis.com/icon?family=Material+Icons" :rel "stylesheet"))
  	    
  	   	    
  	    (:body 
  
negative.code: 			      (:input :type "text" :class "form-control"
  				      :id "input-item-description"
  				      :name "input-item-description"))
  			(:div :class "input-field s6"
  			    
  			      (:label :for "inputPrice" "Price")
  			      (:input :type "text" :class "form-control"
  				      :id "input-item-price"
  				      :name "input-item-price"))
  			(:div :class "input-field s6"
  			     
  			      (:label :for "inputQty" "Quantity")
  			      (:input :type "text" :class "form-control"
  