From 015bb9de15fe12b84b05c1ffd785846f39a087e1 Mon Sep 17 00:00:00 2001 From: Elis Axelsson Date: Sat, 8 Oct 2016 22:53:37 +0200 Subject: [PATCH] Refactored away add-to-list in favor of cl-pushnew in two more places --- webpaste.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/webpaste.el b/webpaste.el index 50490b3..9c1403a 100644 --- a/webpaste.el +++ b/webpaste.el @@ -65,9 +65,9 @@ each run.") (lambda (text) "Paste TEXT to http://ix.io/." - (let ((post-data '())) - ;; Construct post data - (add-to-list 'post-data (cons "f:1" text)) + (let ((post-data)) + ;; Add TEXT to POST-DATA + (cl-pushnew (cons "f:1" text) post-data) ;; Use request.el to do request to ix.io to submit data (request "http://ix.io/" @@ -93,7 +93,7 @@ each run.") ("expiry_days" . "1")))) ;; Add TEXT as content - (add-to-list 'post-data (cons "content" text)) + (cl-pushnew (cons "content" text) post-data) ;; Use request.el to do request to dpaste.com to submit data (request "http://dpaste.com/api/v2/"