[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: 02/02: services: Add Gitolite.
From: |
Mark H Weaver |
Subject: |
Re: 02/02: services: Add Gitolite. |
Date: |
Sat, 29 Sep 2018 21:45:43 -0400 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux) |
Hi Christopher,
address@hidden (Christopher Baines) writes:
> cbaines pushed a commit to branch master
> in repository guix.
>
> commit 258a6d944ed891fa92fa87a16731e5dfe0bac477
> Author: Christopher Baines <address@hidden>
> Date: Fri Jul 13 20:39:46 2018 +0100
>
> services: Add Gitolite.
>
> * gnu/services/version-control.scm (<gitolite-configuration>,
> <gitolite-rc-file>): New record types.
> (gitolite-accounts, gitolite-activation): New procedures.
> (gitolite-service-type): New variables.
> * gnu/tests/version-control.scm (%gitolite-test-admin-keypair,
> %gitolite-os,
> %test-gitolite): New variables.
> (run-gitolite-test): New procedure.
> * doc/guix.texi (Version Control): Document the gitolite service.
This commit has a flaw which broke evaluations on Hydra, so I reverted
it for now.
> +(define-gexp-compiler (gitolite-rc-file-compiler
> + (file <gitolite-rc-file>) system target)
> + (match file
> + (($ <gitolite-rc-file> umask git-config-keys roles enable)
> + (apply text-file* "gitolite.rc"
> + `("%RC = (\n"
> + " UMASK => " ,(format #f "~4,'0o" umask) ",\n"
The problem is here, in the call to 'format'. Guile has two variants of
the 'format' procedure: a very simple one which is always available
(also known as 'simple-format'), and a much more complex and featureful
variant in (ice-9 format). In the code above, you are assuming that
(ice-9 format) has been loaded, but you have not arranged for that to
happen. During the Hydra evaluation, this led to the following error:
--8<---------------cut here---------------start------------->8---
0 (simple-format #f "~4,'0o" 63)
ERROR: In procedure simple-format:
In procedure simple-format: FORMAT: Unsupported format option ~4 - use (ice-9
format) instead
--8<---------------cut here---------------end--------------->8---
I guess that the fix will involve 'with-imported-modules'.
Could you take a look?
Mark
- Re: 02/02: services: Add Gitolite.,
Mark H Weaver <=