gnu - guix - Wojtek's customized Guix

Mode	Name	Size
-rw-r--r--	artwork.scm	1338	log plain about
d---------	build	379	log plain
-rw-r--r--	local.mk	38307	log plain about
-rw-r--r--	packages.scm	13946	log plain about
d---------	packages	13184	log plain
-rw-r--r--	services.scm	22982	log plain about
d---------	services	485	log plain
-rw-r--r--	system.scm	30764	log plain about
d---------	system	471	log plain
-rw-r--r--	tests.scm	5465	log plain about
d---------	tests	36	log plain

"/time-travel/" system))) (return (mkdir-p (%repository-cache-directory))) (latest-channel-derivation channels))))) (define (guix-instance->manifest-entry instance) "Return a manifest entry for INSTANCE." (define (shorten commit) (string-take commit 7)) (manifest-entry (name "guix") (version (string-join (map (compose shorten channel-commit) (guix-instance-channels instance)) "-")) (item instance))) (define (commit->guix-instance commit) "Return a Guix instance for COMMIT." (guix-instance (list (channel (inherit %default-guix-channel) (commit commit))))) (define %release-commits ;; Release commits: the list of version/commit pairs. ;; ;; Note: To merely compute the derivation of these revisions, we need to be ;; able to build their dependencies. Some of them no longer build from ;; source due to time traps like <https://issues.guix.gnu.org/58650>; those ;; need to be built beforehand in a virtual build machine running "in the ;; past". '(("1.4.0" . "8e2f32cee982d42a79e53fc1e9aa7b8ff0514714") ("1.3.0" . "a0178d34f582b50e9bdbb0403943129ae5b560ff") ("1.2.0" . "a099685659b4bfa6b3218f84953cbb7ff9e88063") ("1.1.0" . "d62c9b2671be55ae0305bebfda17b595f33797f2") ("1.0.1" . "d68de958b60426798ed62797ff7c96c327a672ac") ("1.0.0" . "6298c3ffd9654d3231a6f25390b056483e8f407c") ("0.16.0" . "4a0b87f0ec5b6c2dcf82b372dd20ca7ea6acdd9c"))) (manifest (map (match-lambda ((version . commit) (let ((entry (guix-instance->manifest-entry (commit->guix-instance commit)))) (manifest-entry (inherit entry) (version version))))) %release-commits))