anchor.diff:    "Alias for ACCOUNT/VERIFY-CREDENTIALS."
     (account/verify-credentials :include-entities include-entities :skip-status skip-status))
   
  -(defun account/settings/post (trend-woeid sleep-time sleep-time-start sleep-time-end time-zone language)
  +(defun account/settings/post (&key trend-woeid sleep-time sleep-time-start sleep-time-end time-zone language)
     "Updates the authenticating user's settings. Returns a new settings object.
   
   According to spec https://dev.twitter.com/docs/api/1.1/post/account/settings"
  
positive.code: (defvar *users/contributees* "https://api.twitter.com/1.1/users/contributees.json")
  (defvar *users/contributors* "https://api.twitter.com/1.1/users/contributors.json")
  (defvar *users/profile-banner* "https://api.twitter.com/1.1/users/profile_banner.json")
  
  (defclass* user ()
    (id screen-name contributors created-at
  
negative.code:   (mapc #'(lambda (size) (setf (cdr size) (make-banner size)))
          (cdr (assoc :sizes (signed-request *users/profile-banner* :parameters (prepare* user-id screen-name) :method :GET)))))
  
  (defun users/report-spam (&key user-id screen-name)
    "Report the specified user as a spam account to Twitter. Additionally performs the equivalent of POST blocks/create on behalf of the authenticated user.
  
  According to spec https://dev.twitter.com/docs/api/1.1/post/users/report_spam"
    (assert (or screen-name user-id) () "Either SCREEN-NAME or USER-ID are required.")
    (when user-id (assert (numberp user-id) () "USER-ID must be a number."))
    (make-user (signed-request *users/report-spam* :parameters (prepare* user-id screen-name) :method :GET)))
  
  (defun users/suggestions/slug (slug &key language)
    "Access the users in a given category of the Twitter suggested user list.
  
  According to spec https://dev.twitter.com/docs/api/1.1/get/users/suggestions/%3Aslug"
    (when language (assert (valid-language-p language) () "~a is not a supported language." language))
    (make-slug (signed-request (format NIL *users/suggestions/slug* slug) :parameters (prepare* (lang . language)) :method :GET)))
  
  (defun users/suggestions (&key language)
    "Access to Twitter's suggested user list. This returns the list of suggested user categories. The category can be used in GET users/suggestions/:slug to get the users in that category.
  
  According to spec https://dev.twitter.com/docs/api/1.1/get/users/suggestions"
    (when language (assert (valid-language-p language) () "~a is not a supported language." language))
    (mapcar #'make-slug (signed-request *users/suggestions* :parameters (prepare* (lang . language)) :method :GET)))
  
  (defun users/suggestions/slug/members (slug)
    "Access the users in a given category of the Twitter suggested user list and return their most recent status if they are not a protected user.
  
  According to spec https://dev.twitter.com/docs/api/1.1/get/users/suggestions/%3Aslug/members"
    (mapcar #'make-user (signed-request (format NIL *users/suggestions/slug/members* slug) :method :GET)))
  
  (defgeneric save (object)
    (:documentation "Save the given object to twitter. 
  Does not guarantee to save every attribute, see the individual functions."))
  