[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#31089] [PATCH 2/5] services: cgit: Simplify 'serialize-module-link-
|
From: |
Clément Lassieur |
|
Subject: |
[bug#31089] [PATCH 2/5] services: cgit: Simplify 'serialize-module-link-path'. |
|
Date: |
Sat, 7 Apr 2018 19:07:06 +0200 |
* gnu/services/cgit.scm (serialize-module-link-path): Remove STRING-DROP-RIGHT
and UGLIFY-FIELD-NAME.
---
gnu/services/cgit.scm | 5 +----
1 file changed, 1 insertion(+), 4 deletions(-)
diff --git a/gnu/services/cgit.scm b/gnu/services/cgit.scm
index b263aa491..3c685f1b5 100644
--- a/gnu/services/cgit.scm
+++ b/gnu/services/cgit.scm
@@ -150,10 +150,7 @@
(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?)
--
2.17.0