summaryrefslogtreecommitdiff
path: root/local
diff options
context:
space:
mode:
authorOleg Pykhalov <go.wigust@gmail.com>2018-06-23 20:54:19 +0300
committerOleg Pykhalov <go.wigust@gmail.com>2018-06-23 20:54:19 +0300
commitb90eadcf7679d32e210732235c226e53ffe480e8 (patch)
treebbb50b5fa6da94eb80f940720c0de745990fdcb6 /local
parentlocal: emacs-terminal-here-checkout: Update to 1.0-1.c35e747. (diff)
downloadguix-local-b90eadcf7679d32e210732235c226e53ffe480e8.tar.gz
local: Add guix-latest-eval.
* local/packages/guix.scm (guix-latest-eval): New public variable.
Diffstat (limited to 'local')
-rw-r--r--local/packages/guix.scm44
1 files changed, 44 insertions, 0 deletions
diff --git a/local/packages/guix.scm b/local/packages/guix.scm
index 451851b..2cfe5ac 100644
--- a/local/packages/guix.scm
+++ b/local/packages/guix.scm
@@ -7,6 +7,8 @@
#:use-module (guix packages)
#:use-module (guix utils)
#:use-module (gnu packages autotools)
+ #:use-module (gnu packages bash)
+ #:use-module (gnu packages curl)
#:use-module (gnu packages emacs)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages texinfo)
@@ -47,3 +49,45 @@
(synopsis #f)
(description #f)
(license #f))))
+
+(define-public guix-latest-eval
+ (let ((commit "819c3fd9746ecda6a9fd005d1dd7efc70944d2c1"))
+ (package
+ (name "guix-latest-eval")
+ (version (string-append "0.0.1" "-" (string-take commit 7)))
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "git://git.magnolia.local/guix-latest-eval")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32
+ "1nnz8qfmg3f6vn2gc9g3k535smfwb50yq2d1snf0nf9mcn1yji7b"))))
+ (build-system trivial-build-system)
+ (inputs
+ `(("bash" ,bash)
+ ("curl" ,curl)))
+ (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 "curl") "/bin" ":"))
+ (substitute* "guix-latest-eval"
+ (("/bin/sh") (which "bash"))
+ (("curl") (which "curl")))
+ (let ((directory "bin"))
+ (install-file "guix-latest-eval"
+ (string-append %output "/" directory)))
+ #t)))
+ (home-page #f)
+ (synopsis "Get the most recent fully evaluated commit from the build farm")
+ (description
+ "This package provides a Curl script to get the most recent fully
+evaluated commit from the build farm.")
+ (license license:gpl3+))))