[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/webpaste 382e01d 105/298: Added page breaks to files
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/webpaste 382e01d 105/298: Added page breaks to files |
Date: |
Thu, 9 Dec 2021 18:59:54 -0500 (EST) |
branch: elpa/webpaste
commit 382e01d787c4a0fa6bd4c58bed1810ed5b7787e2
Author: Elis Axelsson <elis.axelsson@gmail.com>
Commit: Elis Axelsson <elis.axelsson@gmail.com>
Added page breaks to files
---
test/webpaste-test.el | 10 +++++-----
webpaste.el | 7 +++++++
2 files changed, 12 insertions(+), 5 deletions(-)
diff --git a/test/webpaste-test.el b/test/webpaste-test.el
index 5c54bbd..75de49a 100644
--- a/test/webpaste-test.el
+++ b/test/webpaste-test.el
@@ -5,7 +5,7 @@
(require 'cl-lib)
(require 'webpaste)
-
+
(ert-deftest webpaste-test/paste-region-and-buffer ()
"Test pasting of regions and buffers."
@@ -28,7 +28,7 @@
(should (equal (webpaste-paste-region 10 100)
(buffer-substring 10 100))))))
-
+
(ert-deftest webpaste-test/return-url ()
"Test returning of URL's to the user."
@@ -41,7 +41,7 @@
;; Check so the kill ring contain the correct contents
(should (equal (car kill-ring) "https://example.com/")))
-
+
(ert-deftest webpaste-test/get-provider-priority ()
"Test how it populates webpaste/get-provider-priority."
@@ -68,7 +68,7 @@
(should (equal (webpaste/get-provider-priority)
'("provider2" "provider1" "provider3"))))
-
+
(ert-deftest webpaste-test/callback-from-working-provider ()
"This test just sends a message to a good provider that just works."
@@ -93,7 +93,7 @@
;; Check that we got the expected result
(should (string= returned-result "Works: test-string"))))
-
+
(ert-deftest webpaste-test/callback-from-working-provider-as-fallback ()
"This test sends a message to a bad provider that returns some error data.
diff --git a/webpaste.el b/webpaste.el
index 2147333..1ba4624 100644
--- a/webpaste.el
+++ b/webpaste.el
@@ -37,6 +37,7 @@
(require 'request)
(require 'cl-lib)
+
(defgroup webpaste nil
"Configuration options for webpaste.el where you can define paste providers,
@@ -58,6 +59,7 @@ This list will be re-populated each run based on
‘webpaste-provider-priority
if that variable is nil, it will use the list of names from
‘webpaste-providers’
each run.")
+
(cl-defun webpaste-provider (&key domain
(type "POST")
@@ -100,6 +102,7 @@ Usage:
(webpaste-paste-text text))))
nil))
+
;;; Define providers
(defcustom webpaste-providers-alist
@@ -166,6 +169,7 @@ return it to the user."
:type '(alist :key-type (string :tag "provider name")
:value-type (sexp :tag "webpaste-provider macro definition
for the provider")))
+
(defun webpaste/get-provider-priority ()
"Return provider priority."
@@ -182,6 +186,7 @@ return it to the user."
webpaste-provider-priority)
+
;;;###autoload
(defun webpaste-return-url (returned-url)
@@ -196,6 +201,7 @@ return it to the user."
;; Notify user
(message (concat "Added " returned-url " to kill ring.")))
+
;;;###autoload
(defun webpaste-paste-text (text)
@@ -246,6 +252,7 @@ Argument MARK Current mark."
;; Extract the buffer contents with buffer-substring and paste it
(webpaste-paste-text (buffer-substring (point-min) (point-max))))
+
(provide 'webpaste)
- [nongnu] elpa/webpaste 8861ed8 102/298: Added license-badge, renamed test-vars, stop providing webpaste-test, (continued)
- [nongnu] elpa/webpaste 8861ed8 102/298: Added license-badge, renamed test-vars, stop providing webpaste-test, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste bdc204d 055/298: Autoload return function to always have it available, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 3e81264 067/298: Forgot call to retry sending on failure when refactoring to macro, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste f206653 074/298: Merge branch 'alphapapa-without-eval', ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 87cee69 081/298: Added test for failover to the second provider and not random, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste dcc26da 084/298: Update melpa image links, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 6655ecc 085/298: Rename make compile to make build because it's easier to remember, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 346b5bc 087/298: Rename tests to be prefixed, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 3389b4a 089/298: Do not provide test-helper feature, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 7db5673 093/298: Added more emacs versions for tests, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 382e01d 105/298: Added page breaks to files,
ELPA Syncer <=
- [nongnu] elpa/webpaste b7acc4e 100/298: Added test for returning of URL's, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 8027e6e 106/298: Run tests on emacs 25.2 since it's been released, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste e04d885 114/298: Add (prog1 nil ...) form to avoid having the nil hanging at the end, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 124ef8b 119/298: Drop usage of concat when returning link to users message field, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 69166a3 121/298: Moved error-handling of failed requests out so providers must specify it, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 69f9452 122/298: Bump version for minor release, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 8905a52 125/298: Re-arrange arguments to webpaste-provider and update docs, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 72ba31e 127/298: Bump version for new release, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 7d03ed3 137/298: Removed unused variables defined in function declaration, ELPA Syncer, 2021/12/09
- [nongnu] elpa/webpaste 07a85e9 142/298: Added pre-calculated alist of languages for providers, ELPA Syncer, 2021/12/09