run roam semantic search as shepherd daemon

2 files changed, 15 insertions, 1 deletions

diff --git a/config/shepherd/init.d/my-daemons.scm b/config/shepherd/init.d/my-daemons.scm
index 6388850..1b5daf8 100644
--- a/config/shepherd/init.d/my-daemons.scm
+++ b/config/shepherd/init.d/my-daemons.scm
@@ -16,3 +16,17 @@
             #:log-file "/tmp/habits.log")
    #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
    #:respawn? #t))
+
+(let ((workdir (string-append (getenv "HOME") "/dev/dotfiles/scratch/semgrep/")))
+  (register-services
+   (make <service>
+     #:docstring "Roam semantic DB"
+     #:provides '(roam-semantic-db)
+     #:start (make-forkexec-constructor
+              (list "python"
+                    (string-append workdir "server.py"))
+              #:directory workdir
+              #:environment-variables (list (string-append "PATH=" (getenv "HOME") "/.virtualenvs/language/bin"))
+              #:log-file "/tmp/roam-semantic.log")
+     #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
+     #:respawn? #t)))
diff --git a/config/shepherd/init.scm b/config/shepherd/init.scm
index c94b034..3d47bd4 100644
--- a/config/shepherd/init.scm
+++ b/config/shepherd/init.scm
@@ -22,4 +22,4 @@
 ;; Services to start when shepherd starts:
 ;; Add the name of each service that should be started to the list
 ;; below passed to 'for-each'.
-(for-each start '(habit-logs))
+(for-each start '(habit-logs roam-semantic-db))