aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2015-11-02 22:04:17 +0100
committerLudovic Courtès <ludo@gnu.org>2015-11-02 22:25:12 +0100
commite9b8212414ce9eb113ab36c2353d0bfa1a1acab4 (patch)
tree5e2a1901e1a23e112f50e5c127d8b6b33774e2f6 /gnu
parent87f40011462eea9142de9853377b2cee3c0df785 (diff)
downloadguix-e9b8212414ce9eb113ab36c2353d0bfa1a1acab4.tar
guix-e9b8212414ce9eb113ab36c2353d0bfa1a1acab4.tar.gz
services: slim: Add xterm to the system profile.
* gnu/services/xorg.scm (slim-service-type): Extend PROFILE-SERVICE-TYPE. * gnu/system/examples/desktop.tmpl (packages): Remove XTERM.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/services/xorg.scm7
-rw-r--r--gnu/system/examples/desktop.tmpl4
2 files changed, 8 insertions, 3 deletions
diff --git a/gnu/services/xorg.scm b/gnu/services/xorg.scm
index 639a541777..f4bc8245f5 100644
--- a/gnu/services/xorg.scm
+++ b/gnu/services/xorg.scm
@@ -309,7 +309,12 @@ reboot_cmd " dmd "/sbin/reboot\n"
(list (service-extension dmd-root-service-type
slim-dmd-service)
(service-extension pam-root-service-type
- slim-pam-service)))))
+ slim-pam-service)
+
+ ;; Unconditionally add xterm to the system profile, to
+ ;; avoid bad surprises.
+ (service-extension profile-service-type
+ (const (list xterm)))))))
(define* (slim-service #:key (slim slim)
(allow-empty-passwords? #t) auto-login?
diff --git a/gnu/system/examples/desktop.tmpl b/gnu/system/examples/desktop.tmpl
index 0e26a7ec5e..ff2a1b7306 100644
--- a/gnu/system/examples/desktop.tmpl
+++ b/gnu/system/examples/desktop.tmpl
@@ -3,7 +3,7 @@
(use-modules (gnu) (gnu system nss))
(use-service-modules desktop)
-(use-package-modules xfce ratpoison avahi xorg certs)
+(use-package-modules xfce ratpoison avahi certs)
(operating-system
(host-name "antelope")
@@ -40,7 +40,7 @@
;; Add Xfce and Ratpoison; that allows us to choose
;; sessions using either of these at the log-in screen.
(packages (cons* xfce ratpoison ;desktop environments
- xterm avahi ;useful tools
+ avahi ;useful tools
nss-certs ;for HTTPS access
%base-packages))