Switch from dmd to shepherd.

1 files changed, 9 insertions, 7 deletions

diff --git a/dotfiles/.dmd.d/init.scm b/dotfiles/.config/shepherd/init.scm
index e0b8940..dc0ca43 100644
--- a/dotfiles/.dmd.d/init.scm
+++ b/dotfiles/.config/shepherd/init.scm
@@ -10,8 +10,8 @@
     (0 (begin body ...))
     (pid pid)))
 
-(define provided-by (@@ (dmd service) provided-by))
-(define deregister-service (@@ (dmd service) deregister-service))
+(define provided-by (@@ (shepherd service) provided-by))
+(define deregister-service (@@ (shepherd service) deregister-service))
 
 (define deregister-service*
   (compose deregister-service symbol->string))
@@ -98,7 +98,7 @@ Ruby version, and listens on PORT."
 
 (register-services
  ;; VHL applications
- (rails-service "api" "3002" "1.9.3-p551")
+ (rails-service "api" "3002" "2.2.2")
  (rails-service "ua" "3000" "2.1.5" '(api))
  (rails-service "m3" "3001" "2.2.2" '(api ua punjab openfire sidekiq))
 
@@ -171,6 +171,7 @@ Ruby version, and listens on PORT."
            '("gpg-connect-agent" "killagent" "/bye")))
 
  ;; Mail
+ (simple-service "davmail") ; for dealing with Exchange at work.
  (make <service>
    #:provides '(offlineimap)
    #:requires '()
@@ -207,11 +208,12 @@ Ruby version, and listens on PORT."
    #:stop (make-kill-destructor))
  (simple-service "mpdscribble"))
 
-;; Send dmd into the background.
-(action 'dmd 'daemonize)
+;; Send shepherd into the background.
+(action 'shepherd 'daemonize)
 
 ;; Start the REPL server.
 ;; (spawn-server (make-tcp-server-socket #:port 37148))
 
-;; Services to start when dmd starts:
-(for-each start '(xmodmap emacs gpg-agent offlineimap))
+;; Services to start when shepherd starts:
+;;(for-each start '(xmodmap emacs gpg-agent offlineimap))
+(for-each start '(xmodmap gpg-agent))