diff options
| -rw-r--r-- | src/xyz/euandreh/packages/euandreh.scm | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/src/xyz/euandreh/packages/euandreh.scm b/src/xyz/euandreh/packages/euandreh.scm new file mode 100644 index 0000000..205990d --- /dev/null +++ b/src/xyz/euandreh/packages/euandreh.scm @@ -0,0 +1,58 @@ +(define-module (xyz euandreh packages euandreh) + #:use-module ((ice-9 textual-ports) #:prefix textual-ports:) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (guix transformations) + #:use-module (guix gexp) + #:use-module (guix packages) + #:use-module (guix download) + #:use-module (guix git-download) + #:use-module (guix utils) + #:use-module (guix store) + #:use-module (guix build-system gnu)) + +(define (read-from-store-file src name) + (run-with-store (open-connection) + (gexp->script "read-from-file-in-store" + #~(string-trim-both + (call-with-input-file + #$(file-append src name) + textual-ports:get-string-all))))) + +(define (euandreh-package name version-prefix version hash) + (package + (name name) + (version version) + (source (origin + (method url-fetch) + (uri (string-append + "https://git.euandreh.xyz/" + name + "/snapshot/" + name + "-" + version-prefix + version + ".tar.gz")) + (hash hash))) + (build-system gnu-build-system) + ;; This shouldn't be necessary, but + ;; the `gnu-build-system' doesn't provide a c99 variable + (arguments `(#:make-flags (list (string-append "CC=" ,(cc-for-target))))) + (synopsis (file-append source "/description")) + (description "FIXME") + (home-page (string-append "https://" name ".euandreh.xyz")) + (license license:agpl3+))) + +(define-public remembering + (euandreh-package + "remembering" + "" + "cca66c6f53e8bce857faae88368c0b07e6ace9e1" + (content-hash "1b90cpnv9p6p1cggiv6kp2q6v6lqhsv2q1zk6djnylfzzc8hszay"))) + +(define-public autoqemu + (euandreh-package + "autoqemu" + "5c44e0d0fa46ccd35c28e48849fcd5153fe41e5a" + "" + (content-hash "15zxy86dvahshrghngkb70g6bc0cvz7h547vmh4fkaxgh8zh5ahg"))) |