From 2ebebbc14583e59b28d86af6e8aabe431190d97f Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Wed, 2 Dec 2015 20:40:41 -0500
Subject: aigis: Add lsh-service.

---
 aigis.scm | 19 ++++++++++---------
 1 file changed, 10 insertions(+), 9 deletions(-)

diff --git a/aigis.scm b/aigis.scm
index de89e8a..8dcd66e 100644
--- a/aigis.scm
+++ b/aigis.scm
@@ -20,7 +20,7 @@
 
 (use-modules (gnu)
              (gnu services))
-(use-service-modules desktop xorg)
+(use-service-modules desktop ssh xorg)
 (use-package-modules certs kodi)
 
 (operating-system
@@ -48,11 +48,12 @@
                 (home-directory "/home/dave"))))
   (packages (cons* nss-certs %base-packages))
   (services
-   (modify-services %desktop-services
-     (slim-service-type config =>
-                        (slim-configuration
-                         (inherit config)
-                         (auto-login? #t)
-                         (default-user "dave")
-                         (auto-login-session
-                          #~(string-append #$kodi "/bin/kodi-standalone")))))))
+   (let ((kodi-session #~(string-append #$kodi "/bin/kodi-standalone")))
+     (cons (lsh-service #:initialize? #t)
+           (modify-services %desktop-services
+             (slim-service-type config =>
+                                (slim-configuration
+                                 (inherit config)
+                                 (auto-login? #t)
+                                 (default-user "dave")
+                                 (auto-login-session kodi-session))))))))
-- 
cgit v1.2.3