ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-23 19:19:20 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: slim: Add xterm to the system profile.

Browse source 
* gnu/services/xorg.scm (slim-service-type): Extend
  PROFILE-SERVICE-TYPE.
* gnu/system/examples/desktop.tmpl (packages): Remove XTERM.
This commit is contained in:
Ludovic Courtès 2015-11-02 22:04:17 +01:00
parent 87f4001146
commit e9b8212414
2 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
gnu/services/xorg.scm
View file

@ -309,7 +309,12 @@ (define slim-service-type
(list (service-extension dmd-root-service-type (list (service-extension dmd-root-service-type
slim-dmd-service) slim-dmd-service)
(service-extension pam-root-service-type (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) (define* (slim-service #:key (slim slim)
(allow-empty-passwords? #t) auto-login? (allow-empty-passwords? #t) auto-login?

4
gnu/system/examples/desktop.tmpl
View file

@ -3,7 +3,7 @@
(use-modules (gnu) (gnu system nss)) (use-modules (gnu) (gnu system nss))
(use-service-modules desktop) (use-service-modules desktop)
(use-package-modules xfce ratpoison avahi xorg certs) (use-package-modules xfce ratpoison avahi certs)
(operating-system (operating-system
(host-name "antelope") (host-name "antelope")
@ -40,7 +40,7 @@
;; Add Xfce and Ratpoison; that allows us to choose ;; Add Xfce and Ratpoison; that allows us to choose
;; sessions using either of these at the log-in screen. ;; sessions using either of these at the log-in screen.
(packages (cons* xfce ratpoison ;desktop environments (packages (cons* xfce ratpoison ;desktop environments
xterm avahi ;useful tools avahi ;useful tools
nss-certs ;for HTTPS access nss-certs ;for HTTPS access
%base-packages)) %base-packages))