From ec85d7da14756b10d1e155b8e8b5228f902563ba Mon Sep 17 00:00:00 2001 From: Elis Axelsson Date: Mon, 20 Mar 2017 18:47:52 +0100 Subject: [PATCH] Added unit test for static provider configuration --- test/webpaste-test.el | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/test/webpaste-test.el b/test/webpaste-test.el index 4fcd215..df704e5 100644 --- a/test/webpaste-test.el +++ b/test/webpaste-test.el @@ -17,6 +17,17 @@ '("provider1" "provider2" "provider3")))) +(ert-deftest webpaste--static-provider-priority () + "Test static configuration of webpaste-provider-priority." + + (setq-default webpaste-provider-priority + '("provider2" "provider1" "provider3")) + (setq-default webpaste-providers-alist '()) + + (should (equal (webpaste--get-provider-priority) + '("provider2" "provider1" "provider3")))) + + (ert-deftest webpaste--callback-from-working-provider () "This test just sends a message to a good provider that just works."