aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2022-10-06 08:45:48 -0400
committerDavid Thompson <dthompson2@worcester.edu>2022-10-24 16:37:22 -0400
commit966118da711506b04c11fbfcac9483d59ed2d912 (patch)
treea21c7f104f6c5b50609fb4949b9fede0d61da33f /gnu
parent8663be6da7f13a8eeea71dc1f493f7adc5b7672a (diff)
downloadguix-966118da711506b04c11fbfcac9483d59ed2d912.tar
guix-966118da711506b04c11fbfcac9483d59ed2d912.tar.gz
gnu: version-control: Add make-gitolite procedure.
* gnu/packages/version-control.scm (make-gitolite): New procedure. (gitolite): Use make-gitolite. * doc/guix.texi (Gitolite service): Document how to use make-gitolite.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/version-control.scm16
1 files changed, 12 insertions, 4 deletions
diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index d8d4a77341..2238554706 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -46,6 +46,7 @@
;;; Copyright © 2022 Jai Vetrivelan <jaivetrivelan@gmail.com>
;;; Copyright © 2022 Maxime Devos <maximedevos@telenet.be>
;;; Copyright © 2022 Dhruvin Gandhi <contact@dhruvin.dev>
+;;; Copyright © 2015, 2022 David Thompson <davet@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -139,7 +140,8 @@
#:use-module (gnu packages tls)
#:use-module (gnu packages)
#:use-module (ice-9 match)
- #:use-module (srfi srfi-1))
+ #:use-module (srfi srfi-1)
+ #:export (make-gitolite))
(define-public breezy
(package
@@ -1484,7 +1486,9 @@ linear. It will test every change between two points in the DAG. It will
also walk each side of a merge and test those changes individually.")
(license (license:x11-style "file://LICENSE")))))
-(define-public gitolite
+(define* (make-gitolite #:optional (extra-inputs '()))
+ "Make a gitolite package object with EXTRA-INPUTS added to the binary
+wrappers, to be used for optional gitolite extensions."
(package
(name "gitolite")
(version "3.6.12")
@@ -1576,10 +1580,12 @@ also walk each side of a merge and test those changes individually.")
(list #$output
#$coreutils
#$findutils
- #$git)))))
+ #$git
+ #$@extra-inputs)))))
'("/bin/gitolite" "/bin/gitolite-shell")))))))
(inputs
- (list bash-minimal coreutils findutils git inetutils openssh perl))
+ (append (list bash-minimal coreutils findutils git inetutils openssh perl)
+ extra-inputs))
(home-page "https://gitolite.com")
(synopsis "Git access control layer")
(description
@@ -1587,6 +1593,8 @@ also walk each side of a merge and test those changes individually.")
control to Git repositories.")
(license license:gpl2)))
+(define-public gitolite (make-gitolite))
+
(define-public gitile
(package
(name "gitile")