diff options
| author | Oleg Pykhalov <go.wigust@gmail.com> | 2018-07-05 15:52:06 +0300 |
|---|---|---|
| committer | Oleg Pykhalov <go.wigust@gmail.com> | 2018-08-01 16:18:07 +0300 |
| commit | f00db8b9a1e711e777c4c89b982005a75732095c (patch) | |
| tree | fd0d027ad2e40b49c773695188e4f11b4be90f7e | |
| parent | local: guix-latest-eval: Switch to 'gitlab.com'. (diff) | |
| download | guix-local-f00db8b9a1e711e777c4c89b982005a75732095c.tar.gz | |
wigust: Add guix-misc.
* local/packages/guix.scm (guix-misc): New variable.
| -rw-r--r-- | local/packages/guix.scm | 57 |
1 files changed, 56 insertions, 1 deletions
diff --git a/local/packages/guix.scm b/local/packages/guix.scm index e8cce07..f2c2de2 100644 --- a/local/packages/guix.scm +++ b/local/packages/guix.scm @@ -6,13 +6,16 @@ #:use-module (guix git-download) #:use-module (guix packages) #:use-module (guix utils) - #:use-module (gnu packages autotools) + #:use-module (gnu packages base) #:use-module (gnu packages bash) #:use-module (gnu packages curl) #:use-module (gnu packages emacs) + #:use-module (gnu packages guile) + #:use-module (gnu packages parallel) #:use-module (gnu packages pkg-config) #:use-module (gnu packages texinfo) #:use-module (gnu packages xdisorg) + #:use-module (gnu packages autotools) #:use-module (wigust packages emacs) #:use-module (guix build-system emacs) #:use-module (guix build-system trivial) @@ -91,3 +94,55 @@ "This package provides a Curl script to get the most recent fully evaluated commit from the build farm.") (license license:gpl3+)))) + +(define-public guix-misc + (let ((commit "9d10a3ceeaa538e69c2ee8084fb7d4fc39d87dd3")) + (package + (name "guix-misc") + (version (git-version "0.0.1" "1" commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/wigust/guix-misc.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0hilnzkxlm66hw8dzpa61ahay38r5ppcfamwc8m8mdbg9kkd65nz")))) + (build-system trivial-build-system) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (copy-recursively (assoc-ref %build-inputs "source") ".") + (setenv "PATH" (string-append + (assoc-ref %build-inputs "bash") "/bin" ":" + (assoc-ref %build-inputs "parallel") "/bin" ":" + (assoc-ref %build-inputs "findutils") "/bin" ":" + (assoc-ref %build-inputs "coreutils") "/bin" ":" + (assoc-ref %build-inputs "guile") "/bin" ":")) + (with-directory-excursion "scripts" + (let ((file "guix-compile-package-path")) + (substitute* file + (("/bin/sh") (which "bash")) + (("@FIND_BIN@") (which "find")) + (("@GUILD_BIN@") (which "guild")) + (("@PARALLEL_BIN@") (which "parallel")) + (("@PRINTENV_BIN@") (which "printenv")) + (("@TR_BIN@") (which "tr"))) + (chmod file #o555) + (install-file file (string-append %output "/bin")))) + #t))) + (inputs + `(("bash" ,bash) + ("coreutils" ,coreutils) + ("findutils" ,findutils) + ("guile" ,guile-2.2) + ("parallel" ,parallel))) + (home-page "https://gitlab.com/wigust/guix-misc") + (synopsis "Additional programs to control Guix") + (description + "This package provides an additional programs to control Guix.") + (license license:gpl3+)))) |