Populate tested providers list

10 years ago · 7b0859f46d
parent 3d18f0b71c
commit 7b0859f46d
1 changed files with 4 additions and 0 deletions
--- a/webpaste.el
+++ b/webpaste.el
@ -128,6 +128,10 @@ return it to the user."
        ;; Set names list
        (setq-default webpaste-provider-priority (reverse provider-names))))

+  ;; Populate tested providers for this request if needed
+  (if (eq webpaste-tested-providers nil)
+      (setq webpaste-tested-providers webpaste-provider-priority))
+
  (funcall (cdr (car webpaste-providers-alist)) text))