From mboxrd@z Thu Jan 1 00:00:00 1970 From: Thorsten Wilms Subject: Re: this conf doesnt work. Why ? Date: Sun, 18 Mar 2018 11:15:29 +0100 Message-ID: References: Reply-To: t_w_@freenet.de Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8; format=flowed Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:34167) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1exVON-0003Pd-Ot for help-guix@gnu.org; Sun, 18 Mar 2018 06:18:21 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1exVOK-0007dA-Hp for help-guix@gnu.org; Sun, 18 Mar 2018 06:18:19 -0400 Received: from mout2.freenet.de ([2001:748:100:40::2:4]:49526) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1exVOK-0007Xj-9g for help-guix@gnu.org; Sun, 18 Mar 2018 06:18:16 -0400 Received: from [195.4.92.141] (helo=mjail1.freenet.de) by mout2.freenet.de with esmtpa (ID t_w_@freenet.de) (port 25) (Exim 4.90_1 #2) id 1exVOG-0007vB-5G for help-guix@gnu.org; Sun, 18 Mar 2018 11:18:12 +0100 Received: from [::1] (port=50722 helo=mjail1.freenet.de) by mjail1.freenet.de with esmtpa (ID t_w_@freenet.de) (Exim 4.90_1 #2) id 1exVOF-000390-NO for help-guix@gnu.org; Sun, 18 Mar 2018 11:18:11 +0100 Received: from mx0.freenet.de ([195.4.92.10]:56964) by mjail1.freenet.de with esmtpa (ID t_w_@freenet.de) (Exim 4.90_1 #2) id 1exVLe-0000Ro-HG for help-guix@gnu.org; Sun, 18 Mar 2018 11:15:30 +0100 Received: from p200300e4f3eede0002e029fffe32e625.dip0.t-ipconnect.de ([2003:e4:f3ee:de00:2e0:29ff:fe32:e625]:59206) by mx0.freenet.de with esmtpsa (ID t_w_@freenet.de) (TLSv1.2:ECDHE-RSA-CHACHA20-POLY1305:256) (port 465) (Exim 4.90_1 #2) id 1exVLe-0008Fg-EJ for help-guix@gnu.org; Sun, 18 Mar 2018 11:15:30 +0100 In-Reply-To: Content-Language: en-GB List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-guix-bounces+gcggh-help-guix=m.gmane.org@gnu.org Sender: "Help-Guix" To: help-guix@gnu.org On 17.03.2018 21:46, Catonano wrote: > the machine boots, but it doesn't start a desktop environment, SLIM > doesn't come up > > If I login as root, startx isn't available > > What's wrong with this definition ? > (use-modules (gnu) (gnu system nss)) > (use-modules (gnu packages tryton)) > (use-modules (gnu packages databases)) > ;(use-modules (gnu packages xorg)) > (use-modules (gnu services xorg)) You don't have to repeat the use-modules form, it can be used like this: (use-modules (gnu) (gnu system nss) (gnu packages tryton) (gnu packages databases) (gnu packages xorg)) I'm actually surprised the other way works, but noticed it appears for "Globally-Visible Packages" at: https://www.gnu.org/software/guix/manual/html_node/Using-the-Configuration-System.html > (use-service-modules desktop) > (use-package-modules certs gnome) > ;(use-service-modules databases) > > ;(use-service-modules trytond) > (define %my-services >   (modify-services >    (cons* (gnome-desktop-service) >       (cons* >        (service agetty-service-type >             (agetty-configuration (tty "ttyS0"))) >        %desktop-services)) >    (slim-service-type config => >               (slim-configuration >                (inherit config) >                (startx (xorg-start-command >                 #:configuration-file >                 (xorg-configuration-file >                  ;; Setup X to use a swiss german keyboard layout. >                  #:extra-config >                  '("Section \"InputClass\" >         Identifier \"keyboard-all\" >         Option \"XkbLayout\" \"ch\" ; <~ replace \"ch\" with \"it\" >         MatchIsKeyboard \"on\" > EndSection")))))))) Why do you use one level of indirection for no gain? This can go into services, directly. That modify-services looks very suspicious. Why the nested cons*? modify-services should be fed with one list of services, followed by (type variable => body) clauses, like in: (modify-services %desktop-services (mingetty-service-type config => (mingetty-configuration (inherit config) (motd (plain-file "motd" "Howdy FOSDEM!")))) (upower-service-type config => (upower-configuration (inherit config) (ignore-lid? #true) (percentage-critical 5.)))) modify-services %desktop-services (udev-service-type config => (udev-configuration (inherit config) (rules (append (udev-configuration-rules config) (list %example-udev-rule)))))) Aside of that, I wonder if you have to put the xorg server into either global packages, or install it for root. > (operating-system >   (host-name "antelope") >   (timezone "Europe/Paris") >   (locale "it_IT.utf8") > >   ;;This is to be able to login into a guest system >   (kernel-arguments '("console=ttyS0")) > >   ;; Assuming /dev/sdX is the target hard disk, and "my-root" >   ;; is the label of the target root file system. >   (bootloader (grub-configuration (target "/dev/sda"))) > >   (file-systems (cons (file-system >                         (device "my-root") >                         (title 'label) >                         (mount-point "/") >                         (type "ext4") > >                       ) >                       %base-file-systems)) > >   (users (cons (user-account >                 (name "catonano") >         (password (crypt " " "ab")) >                 (comment "Alice's brother") >                 (group "users") >                 (supplementary-groups '("wheel" "netdev" >                                         "audio" "video")) >                 (home-directory "/home/catonano")) >                %base-user-accounts)) (crypt " " "ab") looks suspicious to me, but I haven't read up on how it should be used. >   ;; This is where we specify system-wide packages. >   (packages (cons* nss-certs         ;for HTTPS access >                    gvfs              ;for user mounts >            ;;python-trytond >            ;;tryton >            ;;postgresql >                    %base-packages)) > >   ;; Add GNOME and/or Xfce---we can choose at the log-in >   ;; screen with F1.  Use the "desktop" services, which >   ;; include the X11 log-in service, networking with Wicd, >   ;; and more. > >   (services %my-services) > >   ;; Allow resolution of '.local' host names with mDNS. >   (name-service-switch %mdns-host-lookup-nss)) > -- Thorsten Wilms thorwil's design for free software: http://thorwil.wordpress.com/