From f7b8fbb504094ad617c7102579559efcc56db5fb Mon Sep 17 00:00:00 2001
From: Giacomo Leidi <therewasa@fishinthecalculator.me>
Date: Sat, 15 Nov 2025 11:48:13 +0100
Subject: [PATCH] home: services: Add home-gc-root-service-type.

* gnu/home/services.scm (home-gc-root-service-type): New variable.

Merges: https://codeberg.org/guix/guix/pulls/4236
Change-Id: I648068fc005a993b9527ed13ae87470c5ce9b693
---
 gnu/home/services.scm | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/gnu/home/services.scm b/gnu/home/services.scm
index 2e51a983cb..6c26afafc4 100644
--- a/gnu/home/services.scm
+++ b/gnu/home/services.scm
@@ -3,6 +3,7 @@
 ;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
 ;;; Copyright © 2022-2023, 2025 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2023 Carlo Zancanaro <carlo@zancanaro.id.au>
+;;; Copyright © 2025 Giacomo Leidi <therewasa@fishinthecalculator.me>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -51,6 +52,7 @@
             home-activation-service-type
             home-run-on-change-service-type
             home-provenance-service-type
+            home-gc-root-service-type
 
             literal-string
             literal-string?
@@ -757,6 +759,14 @@ environment, and its configuration file, when available.")))
 (define sexp->home-provenance sexp->system-provenance)
 (define home-provenance system-provenance)
 
+
+;;;
+;;; Garbage collector roots.
+;;;
+
+(define home-gc-root-service-type
+  (system->home-service-type gc-root-service-type))
+
 
 ;;;
 ;;; Searching