Rename parameter domain to uri for webpaste-provider

This name makes more sense since it's not a domain name put in, it's
acually an URI to the endpoint where we're pasting.
master
Elis Axelsson 9 years ago
parent acf96763d8
commit 44364f4f03
No known key found for this signature in database
GPG Key ID: D57EFA625C9A925F
  1. 20
      webpaste.el

@ -61,7 +61,7 @@ each run.")
(cl-defun webpaste-provider (&key domain (cl-defun webpaste-provider (&key uri
(type "POST") (type "POST")
(parser 'buffer-string) (parser 'buffer-string)
(post-data '()) (post-data '())
@ -70,14 +70,14 @@ each run.")
success) success)
"Macro to create the lambda function for a provider. "Macro to create the lambda function for a provider.
This macro accepts the parameters :domain, :type, :parser, :post-data, This macro accepts the parameters :uri, :type, :parser, :post-data, :post-field
:post-field and :success. and :success.
Usage: Usage:
(webpaste-provider (webpaste-provider
[:keyword [option]]...) [:keyword [option]]...)
:domain URL that we should do the request to to paste data. :uri URI that we should do the request to to paste data.
:type HTTP Request type, defaults to POST. :type HTTP Request type, defaults to POST.
:parser Defines how request.el parses the result. Look up :parser for :parser Defines how request.el parses the result. Look up :parser for
`request`. This defaults to 'buffer-string. `request`. This defaults to 'buffer-string.
@ -93,7 +93,7 @@ Usage:
(cl-pushnew (cons post-field text) post-data) (cl-pushnew (cons post-field text) post-data)
;; Do request ;; Do request
(request domain (request uri
:type type :type type
:data post-data :data post-data
:parser parser :parser parser
@ -111,7 +111,7 @@ Usage:
(defcustom webpaste-providers-alist (defcustom webpaste-providers-alist
(list (list "ptpb.pw" (list (list "ptpb.pw"
(webpaste-provider (webpaste-provider
:domain "https://ptpb.pw/" :uri "https://ptpb.pw/"
:post-field "c" :post-field "c"
:success :success
(cl-function (lambda (&key response &allow-other-keys) (cl-function (lambda (&key response &allow-other-keys)
@ -120,7 +120,7 @@ Usage:
(list "ix.io" (list "ix.io"
(webpaste-provider (webpaste-provider
:domain "http://ix.io/" :uri "http://ix.io/"
:post-field "f:1" :post-field "f:1"
:success :success
(cl-function (lambda (&key data &allow-other-keys) (cl-function (lambda (&key data &allow-other-keys)
@ -130,7 +130,7 @@ Usage:
(list "sprunge.us" (list "sprunge.us"
(webpaste-provider (webpaste-provider
:domain "http://sprunge.us/" :uri "http://sprunge.us/"
:post-field "sprunge" :post-field "sprunge"
:success :success
(cl-function (lambda (&key data &allow-other-keys) (cl-function (lambda (&key data &allow-other-keys)
@ -140,7 +140,7 @@ Usage:
(list "dpaste.com" (list "dpaste.com"
(webpaste-provider (webpaste-provider
:domain "http://dpaste.com/api/v2/" :uri "http://dpaste.com/api/v2/"
:post-data '(("syntax" . "text") :post-data '(("syntax" . "text")
("title" . "") ("title" . "")
("poster" . "") ("poster" . "")
@ -153,7 +153,7 @@ Usage:
(list "dpaste.de" (list "dpaste.de"
(webpaste-provider (webpaste-provider
:domain "https://dpaste.de/api/" :uri "https://dpaste.de/api/"
:post-data '(("lexer" . "text") :post-data '(("lexer" . "text")
("format" . "url") ("format" . "url")
("expires" . 86400)) ("expires" . 86400))

Loading…
Cancel
Save