ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: cgit: Simplify 'serialize-module-link-path'.

Browse source 
* gnu/services/cgit.scm (serialize-module-link-path): Remove STRING-DROP-RIGHT
and UGLIFY-FIELD-NAME.
This commit is contained in:
Clément Lassieur 2018-03-20 19:44:40 +01:00
parent dde99782e0
commit 36027f05e9
No known key found for this signature in database
GPG key ID: 89F96D4808F359C7
1 changed files with 1 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gnu/services/cgit.scm
View file

@ -150,10 +150,7 @@ (define (serialize-module-link-path field-name val)
(if (null? val) ""
(match val
((path text)
(format #t "repo.~a.~a=~a\n"
(string-drop-right (uglify-field-name 'module-link-path)
(string-length "-path"))
path text)))))
(format #t "repo.module-link.~a=~a\n" path text)))))
(define repository-directory? string?)