[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/webpaste d7700eb 050/298: Merge pull request #2 from syohe
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/webpaste d7700eb 050/298: Merge pull request #2 from syohex/cl-lib |
Date: |
Thu, 9 Dec 2021 18:59:42 -0500 (EST) |
branch: elpa/webpaste
commit d7700eb8613c2fa5f7d113c3c06506bcd39b13cb
Merge: 6d2e063 4b9dfa9
Author: Elis Axelsson <elis.axelsson@gmail.com>
Commit: GitHub <noreply@github.com>
Merge pull request #2 from syohex/cl-lib
Use cl-lib macros instead of cl.el
---
webpaste.el | 27 ++++++++++++++-------------
1 file changed, 14 insertions(+), 13 deletions(-)
diff --git a/webpaste.el b/webpaste.el
index f77cace..ce6929c 100644
--- a/webpaste.el
+++ b/webpaste.el
@@ -7,7 +7,7 @@
;; Package-Version: 0.0.1
;; Version: 0.0.1
;; Keywords: convenience, comm, paste
-;; Package-Requires: ((emacs "24.1") (request "0.2.0"))
+;; Package-Requires: ((emacs "24.1") (request "0.2.0") (cl-lib "0.5"))
;;; Commentary:
@@ -35,6 +35,7 @@
;;; Code:
(require 'request)
+(require 'cl-lib)
(defgroup webpaste nil
@@ -73,13 +74,13 @@ each run.")
:type "POST"
:data post-data
:parser 'buffer-string
- :success (function* (lambda (&key data &allow-other-keys)
- (when data
- (webpaste-return-url data))))
+ :success (cl-function (lambda (&key data &allow-other-keys)
+ (when data
+ (webpaste-return-url data))))
:error
- (function* (lambda (&key error-thrown &allow-other-keys&rest
_)
- (message "Got error: %S" error-thrown)
- (webpaste-paste-text text)))))
+ (cl-function (lambda (&key error-thrown &allow-other-keys)
+ (message "Got error: %S" error-thrown)
+ (webpaste-paste-text text)))))
nil))
("dpaste.com" .
(lambda (text)
@@ -100,13 +101,13 @@ each run.")
:data post-data
:parser 'buffer-string
:success
- (function* (lambda (&key response &allow-other-keys)
- (webpaste-return-url
- (request-response-header response
"Location"))))
+ (cl-function (lambda (&key response &allow-other-keys)
+ (webpaste-return-url
+ (request-response-header response
"Location"))))
:error
- (function* (lambda (&key error-thrown &allow-other-keys&rest
_)
- (message "Got error: %S" error-thrown)
- (webpaste-paste-text text)))))
+ (cl-function (lambda (&key error-thrown &allow-other-keys)
+ (message "Got error: %S" error-thrown)
+ (webpaste-paste-text text)))))
nil)))
"Define all webpaste.el providers.
Consists of provider name and lambda function to do the actuall call to the
- [nongnu] elpa/webpaste 015bb9d 057/298: Refactored away add-to-list in favor of cl-pushnew in two more places, (continued)
- [nongnu] elpa/webpaste 015bb9d 057/298: Refactored away add-to-list in favor of cl-pushnew in two more places, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 7688876 058/298: Interactive r for pasting region, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste e12faa5 059/298: Added macro to create provider lambdas, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste f860028 060/298: Migrate providers to macro, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste ccef003 064/298: Replace away newlines from ix.io output, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 6039591 065/298: Added sprunge.us as provider, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 984f838 068/298: Added dpaste.de as provider, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 53dcac8 046/298: Move definition position, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 1c2a9b8 047/298: Merge pull request #1 from syohex/fix-package, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 6d2e063 048/298: Spacing between blocks, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste d7700eb 050/298: Merge pull request #2 from syohex/cl-lib,
ELPA Syncer <=
- [nongnu] elpa/webpaste c33f341 019/298: Added custom for provider priority, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste cc05738 025/298: Added some TODO notes, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 729e277 030/298: Paste to selected paste provider at the top of the list, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 80f0afe 051/298: Added provider to todo-list, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste cb9cca7 054/298: Stop moving point and remove usage of save-excursion and therefore, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 2250993 061/298: Fix eval of macros, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste c60c712 062/298: Checkdoc, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 39809d8 063/298: Update documentation, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste c57cd53 071/298: Changed string to number, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 78651c9 073/298: Avoid using eval, ELPA Syncer, 2021/12/09