ryuslash/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add syncthing configuration

Browse source
This commit is contained in:
Tom Willemse 2022-04-20 16:44:52 -07:00
parent 798b19788e
commit 5056a6051b
2 changed files with 53 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
oni/home/data/config.scm
View file

@ -19,7 +19,8 @@
#:use-module (oni home services herbstluftwm)
#:use-module (oni home services polybar)
#:use-module (oni home services kdeconnect)
#:use-module (oni home services cmst))
#:use-module (oni home services cmst)
#:use-module (oni home services syncthing))
(home-environment
(packages (list (specification->package+output "glibc-locales")
@ -366,4 +367,6 @@
(service home-kdeconnect-service-type)
(service home-cmst-service-type))))
(service home-cmst-service-type)
(service home-syncthing-service-type))))

48
oni/home/services/syncthing.scm Normal file
View file

@ -0,0 +1,48 @@
(define-module (oni home services syncthing)
#:use-module (gnu services configuration)
#:use-module (gnu packages syncthing)
#:use-module (gnu home services)
#:use-module (gnu home services shepherd)
#:use-module (gnu home services utils)
#:use-module (guix packages)
#:use-module (guix gexp)
#:export (home-syncthing-service-type
home-syncthing-configuration))
(define-configuration home-syncthing-configuration
(package
(package syncthing-gtk)
"Package to use for setting syncthing"))
(define (add-syncthing-packages config)
(list (home-syncthing-configuration-package config)))
(define (home-syncthing-shepherd-service config)
(list
(shepherd-service
(documentation "Start syncthing")
(provision '(syncthing))
(auto-start? #t)
(start
#~(make-system-constructor
#$(file-append (home-syncthing-configuration-package config) "/bin/syncthing-gtk")
" --minimized"))
(stop
#~(make-system-destructor
#$(file-append (home-syncthing-configuration-package config) "/bin/syncthing-gtk")
" --quit")))))
(define home-syncthing-service-type
(service-type
(name 'home-syncthing)
(extensions
(list (service-extension
home-profile-service-type
add-syncthing-packages)
(service-extension
home-shepherd-service-type
home-syncthing-shepherd-service)))
(compose identity)
(default-value (home-syncthing-configuration))
(description "Install and configure syncthing.")))