[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/webpaste 7f62fed 118/298: Tidy up some lists in tests with
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/webpaste 7f62fed 118/298: Tidy up some lists in tests with backquotes |
Date: |
Thu, 9 Dec 2021 18:59:56 -0500 (EST) |
branch: elpa/webpaste
commit 7f62fed247d10e190abf519d01e42851986d4c8f
Author: Elis Axelsson <elis.axelsson@gmail.com>
Commit: Elis Axelsson <elis.axelsson@gmail.com>
Tidy up some lists in tests with backquotes
---
test/webpaste-test.el | 40 ++++++++++++++++++++--------------------
1 file changed, 20 insertions(+), 20 deletions(-)
diff --git a/test/webpaste-test.el b/test/webpaste-test.el
index e38f849..70005dc 100644
--- a/test/webpaste-test.el
+++ b/test/webpaste-test.el
@@ -68,9 +68,9 @@
;; Prepare variables
(setq-default webpaste-provider-priority nil)
(setq-default webpaste-providers-alist
- (list (list "provider1" "lambda")
- (list "provider2" "lambda")
- (list "provider3" "lambda")))
+ `(("provider1" "lambda")
+ ("provider2" "lambda")
+ ("provider3" "lambda")))
;; Do test
(should (equal (webpaste/get-provider-priority)
@@ -100,10 +100,10 @@
;; Make a fake provider that just "returns" the paste result by setting a
;; variable and concatinate it with "Works: " so we can see it showing up
(setq-default webpaste-providers-alist
- (list (list "workingprovider"
- (lambda (text)
- (setq returned-result
- (concat "Works: " text))))))
+ `(("workingprovider"
+ ,(lambda (text)
+ (setq returned-result
+ (concat "Works: " text))))))
;; Call webpaste
(webpaste-paste-text "test-string")
@@ -128,19 +128,19 @@ result from the good provider only."
;; Creates a "broken" provider that will call on the next provider due to a
;; faked failure and checks that the next provider is picked up correctly.
(setq-default webpaste-providers-alist
- (list (list "brokenprovider"
- (lambda (text)
- ;; Set return text
- (setq returned-result
- (concat "Broken: " text))
-
- ;; Call paste again
- (webpaste-paste-text text)))
-
- (list "workingprovider"
- (lambda (text)
- (setq returned-result
- (concat "Working: " text))))))
+ `(("brokenprovider"
+ ,(lambda (text)
+ ;; Set return text
+ (setq returned-result
+ (concat "Broken: " text))
+
+ ;; Call paste again
+ (webpaste-paste-text text)))
+
+ ("workingprovider"
+ ,(lambda (text)
+ (setq returned-result
+ (concat "Working: " text))))))
;; Call webpaste
(webpaste-paste-text "test-string")
- [nongnu] elpa/webpaste f0a36e2 140/298: Added some docs of how to enable the confirmation dialog before pasting, (continued)
- [nongnu] elpa/webpaste f0a36e2 140/298: Added some docs of how to enable the confirmation dialog before pasting, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 272757b 056/298: Change documentation string, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 58f66ef 069/298: Bump version to prepare for melpa stable, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 6e34759 072/298: Added another privider to list to implement, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste f378ca9 075/298: Added Cask file, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 2bb8a4c 077/298: Set up tests directory, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste f338ca7 083/298: Added Travis-CI build status image, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste f658339 096/298: Bump version number for stable release, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste e485847 107/298: Break out pasting to provider to own function, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 406d713 115/298: Shared success lambdas between different paste providers, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 7f62fed 118/298: Tidy up some lists in tests with backquotes,
ELPA Syncer <=
- [nongnu] elpa/webpaste 0e4ac51 132/298: Added support for buffer-language depending on mode for some providers, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 9ddc617 133/298: Simplify webpaste/get-lang-alist-with-overrides implementation, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste f08a2dc 136/298: Rename internal variable, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste af0474e 139/298: Merge branch 'naclander-master', ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste b9b2ce0 143/298: Added support for languages for providers that appends language to the URL, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste c091dab 146/298: Change some types based on actual use, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 0144016 147/298: Remove unused variable, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste b5491ab 150/298: Bump version for stable release, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 29d10d7 151/298: Added paste.pound-python.org as provider, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 410e286 152/298: Added webpaste confirmation tests, ELPA Syncer, 2021/12/09