tribes/guix-tribes
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Make the Tribes installer source-only

Browse Source
This commit is contained in:
Steffen
2026-03-31 20:03:28 +02:00
parent 1419825ec7
commit bd704e5d9c
1 changed files with 7 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
tribes/system/installer.scm
View File

@@ -3,7 +3,6 @@
#:use-module (gnu services databases)
#:use-module (guix gexp)
#:use-module (nbde system installed-base)
#:use-module (tribes packages release)
#:use-module (tribes packages source)
#:use-module (tribes services tribes)
#:use-module (tribes system node)
@@ -36,27 +35,17 @@
interface
authorized-keys-file)
"Return an installed NBDE operating-system extended with PostgreSQL and the
Tribes service. The package is provided either through TRIBES_RELEASE_DIRECTORY
or by building from TRIBES_SOURCE_DIRECTORY."
(let* ((release-directory
(getenv "TRIBES_RELEASE_DIRECTORY"))
(source-directory (getenv "TRIBES_SOURCE_DIRECTORY"))
Tribes service. The package is built from TRIBES_SOURCE_DIRECTORY."
(let* ((source-directory (getenv "TRIBES_SOURCE_DIRECTORY"))
(service-user (getenv/default "TRIBES_SERVICE_USER" "tribes"))
(service-group (getenv/default "TRIBES_SERVICE_GROUP" service-user))
(database-user (getenv/default "TRIBES_DATABASE_USER" service-user))
(package
(cond
(source-directory
(if source-directory
(tribes-source-package
(tribes-source-directory->local-file source-directory)
#:version (getenv/default "TRIBES_RELEASE_VERSION" "dev")))
(release-directory
(tribes-release-package
(local-file release-directory #:recursive? #t)
#:version (getenv/default "TRIBES_RELEASE_VERSION" "dev")))
(else
(error "missing Tribes package input; set TRIBES_RELEASE_DIRECTORY or "
"TRIBES_SOURCE_DIRECTORY"))))
#:version (getenv/default "TRIBES_RELEASE_VERSION" "dev"))
(error "missing Tribes source input; set TRIBES_SOURCE_DIRECTORY")))
(tribes-config
(tribes-configuration
(package package)