From 12831962d7664f2c19689871f977670c197ad409 Mon Sep 17 00:00:00 2001 From: Peter Tillemans Date: Tue, 22 Jul 2025 12:25:07 +0200 Subject: [PATCH] remove unneeded function --- snamellit/common.scm | 15 --------------- 1 file changed, 15 deletions(-) diff --git a/snamellit/common.scm b/snamellit/common.scm index baf819a..c5403c0 100644 --- a/snamellit/common.scm +++ b/snamellit/common.scm @@ -278,21 +278,6 @@ (service home-mcron-service-type) )) -;; add folders at the end of a PATH like string, removing duplicates but -;; keeping the order of first occurrence -(define - (add-folders-to-path path folders) - (if - (null? folders) - (string-join - (delete-duplicates - (string-split path #\:)) - ":") - (add-folders-to-path - (string-append path ":" - (car folders)) - (cdr folders)))) - (define-public %snam-desktop-services (list (service home-dbus-service-type)