branch: externals/srht
commit 3c4df2cff19c1ea00df316a80b73669e559b2cfd
Author: Aleksandr Vityazev <avitya...@posteo.org>
Commit: Aleksandr Vityazev <avitya...@posteo.org>
Add make rules.
* lisp/srht-pkg: Add dependencies.
* tests/test: Add tests.
* lisp/srht: Require 28.1.
* Makefile: Add rules.
---
Eldev | 5 ++++-
Makefile | 4 ++++
lisp/srht-paste.el | 7 -------
lisp/srht-pkg.el | 2 +-
lisp/srht.el | 2 +-
tests/test.el | 39 +++++++++++++++++++++++++++++++++++++++
6 files changed, 49 insertions(+), 10 deletions(-)
diff --git a/Eldev b/Eldev
index 4baf234893..e13ca687bc 100644
--- a/Eldev
+++ b/Eldev
@@ -5,4 +5,7 @@
;(eldev-use-package-archive 'nongnu)
;(eldev-use-package-archive 'melpa)
-(eldev-use-plugin 'autoloads)
+;; (eldev-use-plugin 'autoloads)
+;; (file-name-directory (find-library-name "plz"))
+(setq eldev-project-main-file "lisp/srht.el")
+(eldev-use-local-dependency
"/gnu/store/r48pqszz01hvph933i7k5m2h0cwh0wpz-emacs-rrr-plz-0.1-pre-2.1d3efc0/share/emacs/site-lisp/rrr-plz-0.1-pre-2.1d3efc0/")
diff --git a/Makefile b/Makefile
index 87e2b36ac9..fc3162f318 100644
--- a/Makefile
+++ b/Makefile
@@ -1,2 +1,6 @@
build:
guix build -f guix.scm
+lint:
+ eldev lint
+test:
+ eldev test
diff --git a/lisp/srht-paste.el b/lisp/srht-paste.el
index e30b565350..82b89a91aa 100644
--- a/lisp/srht-paste.el
+++ b/lisp/srht-paste.el
@@ -2,13 +2,6 @@
;; Copyright © 2022 Aleksandr Vityazev <avitya...@posteo.org>
-;; Author: Aleksandr Vityazev <avitya...@posteo.org>
-;; Keywords: comm
-;; Package-Version: 0.1.0
-;; Homepage: https://sr.ht/~akagi/srht.el/
-;; Package-Requires: ((emacs "27.1"))
-
-
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
diff --git a/lisp/srht-pkg.el b/lisp/srht-pkg.el
index e90c4c1933..549c9c768e 100644
--- a/lisp/srht-pkg.el
+++ b/lisp/srht-pkg.el
@@ -3,7 +3,7 @@
"srht"
"0.1.0"
"Sourcehut"
- '((emacs "28.1"))
+ '((emacs "28.1") (plz "0.1-pre"))
:authors '(("Aleksandr Vityazev" . "avitya...@posteo.org"))
:maintainer '("Aleksandr Vityazev" . "avitya...@posteo.org")
:keywords '("comm"))
diff --git a/lisp/srht.el b/lisp/srht.el
index c27309a97a..0287bb40b6 100644
--- a/lisp/srht.el
+++ b/lisp/srht.el
@@ -7,7 +7,7 @@
;; Package-Version: 0.1.0
;; Homepage: https://sr.ht/~akagi/srht.el/
;; Keywords: comm
-;; Package-Requires: ((emacs "27.1") (plz "0.1-pre"))
+;; Package-Requires: ((emacs "28.1") (plz "0.1-pre"))
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
diff --git a/tests/test.el b/tests/test.el
new file mode 100644
index 0000000000..59bef9fc48
--- /dev/null
+++ b/tests/test.el
@@ -0,0 +1,39 @@
+;;; test.el --- Tests -*- lexical-binding: t;
-*-
+
+;; Copyright © 2022 Aleksandr Vityazev <avitya...@posteo.org>
+
+;; Author: Aleksandr Vityazev <avitya...@posteo.org>
+;; Keywords: tests
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'ert)
+(require 'srht)
+(require 'srht-paste)
+
+(ert-deftest test-srht-paste ()
+ (should (equal (srht-paste "489fa091d5c6d5751769375a6f0e00447347adff")
+ '(:service paste
+ :path "/api/pastes/489fa091d5c6d5751769375a6f0e00447347adff"
+ :form nil))))
+
+(ert 'test-srht-paste)
+(provide 'test)
+;;; test.el ends here
