anchor.diff:  						       (acons "MaxDataServiceVersion" "2.0;NetFx" ; Needed for 2009-09-19
   							      headers))))
   			 :body content
  -			 :account account))))))
  +			 :account account)))))
   
   (defun list-tablename-elements-handler (response)
     "Extracts a list of tables from an ADO.NET entity set Atom feed response body."
  
positive.code: 
  ;; merge entity
  
  ;; delete entity
negative.code:   "Makes an HTTP request to the Table storage API."
    (funcall handler
  	   (web-request 
  	    (sign-table-storage-request 
  		   (list :method method 
  			 :uri (format nil "~a~a" (table-storage-url account) resource)
  			 :headers (acons "x-ms-date" (rfc1123-date-time-string)
  