Revert "remove unneeded function"

This reverts commit 12831962d7.
This commit is contained in:
Peter Tillemans 2025-07-22 12:37:31 +02:00
parent 5d82f400f1
commit 081221ca29

View file

@ -278,6 +278,21 @@
(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)