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

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

[nongnu] elpa/webpaste 54e2ed4 178/298: Added integration test for ix.io


From: ELPA Syncer
Subject: [nongnu] elpa/webpaste 54e2ed4 178/298: Added integration test for ix.io
Date: Thu, 9 Dec 2021 19:00:09 -0500 (EST)

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

    Added integration test for ix.io
---
 tests/integration/test-webpaste-providers.el | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/tests/integration/test-webpaste-providers.el 
b/tests/integration/test-webpaste-providers.el
index 1b0e499..78b3059 100644
--- a/tests/integration/test-webpaste-providers.el
+++ b/tests/integration/test-webpaste-providers.el
@@ -30,6 +30,25 @@
             :to-equal
             (make-spy-context :current-buffer (current-buffer)
                               :args '("https://ptpb.pw/gLC6";)
+                              :return-value nil))))
+
+
+ (it
+  "can paste with ix.io"
+
+  (let ((provider (cadr (assoc "ix.io" webpaste-providers-alist))))
+    (funcall
+     provider
+     ";; This is a build artifact made from an integration test for 
https://github.com/etu/webpaste.el";
+     :sync t)
+
+    (expect (spy-calls-count 'webpaste-return-url) :to-equal 1)
+    (expect (spy-calls-count 'webpaste-paste-text) :to-equal 0)
+
+    (expect (spy-calls-most-recent 'webpaste-return-url)
+            :to-equal
+            (make-spy-context :current-buffer (current-buffer)
+                              :args '("http://ix.io/whJ";)
                               :return-value nil)))))
 
 



reply via email to

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