[nongnu] elpa/webpaste 0b67c54 117/298: Move code up to be defined before the webpaste-provider function

[ELPA Syncer]

branch: elpa/webpaste
commit 0b67c544220be4ec3a005b7dd4326eedf229d880
Author: Elis Axelsson <elis.axelsson@gmail.com>
Commit: Elis Axelsson <elis.axelsson@gmail.com>

    Move code up to be defined before the webpaste-provider function
---
 webpaste.el | 36 ++++++++++++++++++------------------
 1 file changed, 18 insertions(+), 18 deletions(-)

diff --git a/webpaste.el b/webpaste.el
index 5198932..dee8844 100644
--- a/webpaste.el
+++ b/webpaste.el
@@ -61,6 +61,24 @@ each run.")
 
 
 
+;;; Predefined success lambdas for providers
+(defvar webpaste/providers-success-location-header
+  (cl-function (lambda (&key response &allow-other-keys)
+                 (when response
+                   (webpaste-return-url
+                    (request-response-header response "Location")))))
+  "Predefined success callback for providers returning a Location header.")
+
+
+(defvar webpaste/providers-success-returned-string
+  (cl-function (lambda (&key data &allow-other-keys)
+                 (when data
+                   (webpaste-return-url
+                    (replace-regexp-in-string "\n$" "" data)))))
+  "Predefined success callback for providers returning a string with URL.")
+
+
+
 (cl-defun webpaste-provider (&key uri
                                   (type "POST")
                                   (parser 'buffer-string)
@@ -108,24 +126,6 @@ Usage:
 
 
 
-;;; Predefined success lambdas for providers
-(defvar webpaste/providers-success-location-header
-  (cl-function (lambda (&key response &allow-other-keys)
-                 (when response
-                   (webpaste-return-url
-                    (request-response-header response "Location")))))
-  "Predefined success callback for providers returning a Location header.")
-
-
-(defvar webpaste/providers-success-returned-string
-  (cl-function (lambda (&key data &allow-other-keys)
-                 (when data
-                   (webpaste-return-url
-                    (replace-regexp-in-string "\n$" "" data)))))
-  "Predefined success callback for providers returning a string with URL.")
-
-
-
 ;;; Define providers
 (defcustom webpaste-providers-alist
   `(("ptpb.pw"