(define pluto
  (make <service>
	#:provides '(pluto)
	#:docstring "Run a pluto web server"
	#:start (make-forkexec-constructor
		  ;; Update the path to runpluto as the guix-profile changes.
		  '("/home/shepherd/guix-profiles/pluto/bin/guix" "shell" "--container" "--network" "--no-cwd" "julia-visuals" "--" "/gnu/store/wbci39sd5pqrjrb5ak0lkmv9jhnl35kv-julia-visuals-0.0.0-1.e7d670e/runpluto.sh")
		  #:log-file "/home/shepherd/logs/pluto.log")
	#:stop (make-kill-destructor)
	#:respawn? #t))
(register-services pluto)

(start pluto)