From e215ff3c3121c53c80635fb9a077480123d65fba Mon Sep 17 00:00:00 2001 From: James Kalyan Date: Sun, 26 Jan 2025 14:38:58 -0500 Subject: [PATCH] services: Deprecate zerotier-service for zerotier-service-type. * nongnu/services/vpn (zerotier-one-service-type): Rename to ... (zerotier-service-type): ... this. Set default-value. (zerotier-one-service-type, zerotier-one-service): Deprecate procedures. Signed-off-by: John Kehayias --- nongnu/services/vpn.scm | 19 ++++++++++++++----- 1 file changed, 14 insertions(+), 5 deletions(-) diff --git a/nongnu/services/vpn.scm b/nongnu/services/vpn.scm index 71a15dc..bebc553 100644 --- a/nongnu/services/vpn.scm +++ b/nongnu/services/vpn.scm @@ -1,13 +1,16 @@ ;;; SPDX-License-Identifier: GPL-3.0-or-later ;;; Copyright © 2020 Alexey Abramov +;;; Copyright © 2025 James Kalyan (define-module (nongnu services vpn) + #:use-module (guix deprecation) #:use-module (guix gexp) #:use-module (gnu packages) #:use-module (gnu services) #:use-module (gnu services shepherd) #:use-module (nongnu packages vpn) - #:export (zerotier-one-service)) + #:export (zerotier-service-type + zerotier-one-service)) (define %zerotier-action-join (shepherd-action @@ -47,12 +50,18 @@ (list (string-append #$zerotier "/sbin/zerotier-one")))) (stop #~(make-kill-destructor)))))) -(define zerotier-one-service-type - (service-type (name 'zerotier-one) +(define zerotier-service-type + (service-type (name 'zerotier) (description "ZeroTier One daemon.") (extensions (list (service-extension shepherd-root-service-type - zerotier-one-shepherd-service))))) + zerotier-one-shepherd-service))) + (default-value '()))) -(define* (zerotier-one-service #:key (config (list))) +(define-deprecated/alias + zerotier-one-service-type + zerotier-service-type) + +(define-deprecated (zerotier-one-service #:key (config '())) + zerotier-service-type (service zerotier-one-service-type config))