badri · June 10, 2016 01:45
diff --git a/leanpub-preview.el b/leanpub-preview.el
 (defun leanpub-preview ()
  "Generate a preview of your book @ Leanpub."
  (interactive)
  (request
   "https://leanpub.com/<YOUR-BOOK-SLUG>/preview.json" ;; or better yet, get the book slug from the buffer
   :type "POST"                                        ;; and construct the URL
   :data '(("api_key" . "53cr3t"))
   :parser 'json-read
   :success (function*
             (lambda (&key data &allow-other-keys)
               (message "Preview generation queued at leanpub.com."))))
  )
	(defun leanpub-preview ()
	"Generate a preview of your book @ Leanpub."
	(interactive)
	(request
	"https://leanpub.com/<YOUR-BOOK-SLUG>/preview.json" ;; or better yet, get the book slug from the buffer
	:type "POST" ;; and construct the URL
	:data '(("api_key" . "53cr3t"))
	:parser 'json-read
	:success (function*
	(lambda (&key data &allow-other-keys)
	(message "Preview generation queued at leanpub.com."))))
	)