anchor.diff:                                       "v2.5/"
                                        fb-location-id)
                                :parameters (list (cons "access_token" fb-token)
  +                                               (cons "access_token" *facebook-app-token*)
                                                  (cons "fields" "location")
                                                  (cons "method" "get"))))))))
   
  
positive.code:                           (cdr (assoc :content-type (third response)))))))
    image-id)
  
  (defun get-facebook-location-data (fb-location-id fb-token)
    (alist-plist
      (cdr
  
negative.code:   (when (= (second reply) 200)
      (decode-json-octets (first reply))))
  
  
  (defun update-facebook-object
    (k-id
     &aux (item (db k-id))
  