|
|
ExampleUsage
Usage examples.
Examples
;; Set the tumblr URI (setf cl-tumblr:*tumblr-uri* "http://sub.tumblr.com") ;; Grab the 30 latest regular items (defvar *reg-items* (cl-tumblr:get-items :start 0 :num 30 :type "regular")) ;; Collect the titles (mapcar (lambda (x) (cl-tumblr:item-data x "title")) *reg-items*) ;; Get the 10 latest items (defvar *items* (cl-tumblr:get-items :num 10)) ;; Collect the types of the items (mapcar #'cl-tumblr:item-type *items*) ;; Collect the URIs for items (mapcar (lambda (x) (cl-tumblr:item-metadata x "url")) *items*) ;; Fetch a specific item (cl-tumblr:get-item 2044201)
Sign in to add a comment