emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/webpaste ef33b0f 269/298: Fix provider definition issue an


From: ELPA Syncer
Subject: [nongnu] elpa/webpaste ef33b0f 269/298: Fix provider definition issue and add test for paste.mozilla.org
Date: Thu, 9 Dec 2021 19:00:27 -0500 (EST)

branch: elpa/webpaste
commit ef33b0f298bf36cfb84b37af4870706fc376b0c3
Author: Elis Hirwing <elis@hirwing.se>
Commit: Elis Hirwing <elis@hirwing.se>

    Fix provider definition issue and add test for paste.mozilla.org
---
 README.org                                   | 2 +-
 tests/integration/test-webpaste-providers.el | 9 +++++++++
 webpaste.el                                  | 2 +-
 3 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index 3d1b7d5..944092e 100644
--- a/README.org
+++ b/README.org
@@ -173,7 +173,7 @@ webpaste first and then just read the documentation by 
running this:
   (describe-function 'webpaste--provider)
 #+end_src
 
-* TODO Providers to implement [5/12]
+* TODO Providers to implement [6/13]
  - [ ] clbin.com
  - [ ] 0x0.st
  - [X] ix.io
diff --git a/tests/integration/test-webpaste-providers.el 
b/tests/integration/test-webpaste-providers.el
index 6dc8ee2..e9273a7 100644
--- a/tests/integration/test-webpaste-providers.el
+++ b/tests/integration/test-webpaste-providers.el
@@ -46,6 +46,15 @@
 
 
  (it
+  "can paste with paste.mozilla.org [ci]"
+
+  (funcall (webpaste--get-provider-by-name "paste.mozilla.org") paste-message 
:sync t)
+
+  (expect (spy-calls-count 'webpaste--return-url) :to-equal 1)
+  (expect (spy-calls-count 'webpaste--paste-text) :to-equal 0))
+
+
+ (it
   "can paste with gist.github.com [local]"
 
   ;; Override function to extract filename from a filepath, otherwise it breaks
diff --git a/webpaste.el b/webpaste.el
index a11e9a0..7895bbc 100644
--- a/webpaste.el
+++ b/webpaste.el
@@ -113,7 +113,7 @@ This uses `browse-url-generic' to open URLs."
      :lang-overrides ((emacs-lisp-mode . "clojure"))
      :success-lambda webpaste--providers-success-returned-string)
 
-    '("paste.mozilla.org"
+    ("paste.mozilla.org"
       :uri "https://paste.mozilla.org/api/";
       :post-data (("expires" . 86400))
       :post-field "content"



reply via email to

[Prev in Thread] Current Thread [Next in Thread]