From 4937b30bd545748fe50e986e49b1195dc3fc5206 Mon Sep 17 00:00:00 2001 From: Elis Axelsson Date: Sun, 4 Jun 2017 11:25:25 +0200 Subject: [PATCH] Change integration test to contain a link to webpaste in the pasted message --- tests/integration/test-webpaste-providers.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/tests/integration/test-webpaste-providers.el b/tests/integration/test-webpaste-providers.el index 38db120..1b0e499 100644 --- a/tests/integration/test-webpaste-providers.el +++ b/tests/integration/test-webpaste-providers.el @@ -18,7 +18,10 @@ "can paste with ptpb.pw" (let ((provider (cadr (assoc "ptpb.pw" webpaste-providers-alist)))) - (funcall provider ";; This is my test text" :sync t) + (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) @@ -26,7 +29,7 @@ (expect (spy-calls-most-recent 'webpaste-return-url) :to-equal (make-spy-context :current-buffer (current-buffer) - :args '("https://ptpb.pw/Dj5w") + :args '("https://ptpb.pw/gLC6") :return-value nil)))))