gist.el

(defun gist-created-callback (gist)
  (let ((location (oref gist :html-url)))
    (message "Paste created: %s" location)
    (when gist-view-gist
      (browse-url location))
    (kill-new location)))