unofficial mirror of help-guix@gnu.org 
 help / color / mirror / Atom feed
From: Alex Kost <alezost@gmail.com>
To: Dmitry Nikolaev <cameltheman@gmail.com>
Cc: help-guix@gnu.org
Subject: Re: Customize %desktop-services.
Date: Wed, 25 May 2016 11:20:04 +0300	[thread overview]
Message-ID: <87zirezgzv.fsf@gmail.com> (raw)
In-Reply-To: <CAH3JXcGGwEswrsdBU7B0aewxZqo=wczQzLfWYqFGEPw_Hppj6Q@mail.gmail.com> (Dmitry Nikolaev's message of "Tue, 24 May 2016 23:42:16 +0300")

[-- Attachment #1: Type: text/plain, Size: 743 bytes --]

Dmitry Nikolaev (2016-05-24 23:42 +0300) wrote:

[...]
> Second one gives
>
> guix system: error: service 'xorg-server' provided more than once

As I wrote in the previous message, I don't reproduce this.  Both
configs didn't give me any error, but when I added another (the second)
slim-service, then this error appears.  Are absolutely sure you specify
the right config for "guix system" command?

Can you try the attached config?  It is the same as yours, except I
commented non-free stuff from your modules, because I don't have them.
I ran the following command:

  guix system build --no-substitutes --dry-run --no-grafts .../attached-config.scm

and got no error (only a huge output of what would be built).  Is it
successful for you?


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: os-nikolaev-new2.scm --]
[-- Type: text/x-scheme, Size: 4600 bytes --]

(use-modules (gnu)
             (gnu packages admin)
             (gnu packages fonts)
             (gnu packages gl)
             (gnu packages gnome)
             (gnu packages gnuzilla)
             (gnu packages guile)
             (gnu packages java)
             (gnu packages linux)
             (gnu packages ntp)
             (gnu packages pulseaudio)
             (gnu packages ruby)
             (gnu packages screen)
             (gnu packages slim)
             (gnu packages suckless)
             (gnu packages version-control)
             (gnu packages wget)
             (gnu packages wicd)
             (gnu packages wm)
             (gnu packages xdisorg)
             (gnu packages xorg)
             (gnu packages zip)
             (gnu services)
             (gnu services avahi)
             (gnu services dbus)
             (gnu services desktop)
             (gnu services xorg)
             (gnu system nss)
             (guix gexp)
             (guix monads)
             (guix store)
             (srfi srfi-1)
             ;; (linux-nonfree)
             ;; (xorg-ati)
             ;; (font-hack)
             )
;; (use-service-modules xorg ati avahi dbus desktop networking ssh)
;; (use-package-modules admin certs slim xorg)
(use-service-modules avahi dbus networking ssh)
(use-package-modules admin certs ntp)

(define libinput.conf "
# Use the libinput driver for all event devices
Section \"InputClass\"
    Identifier \"libinput keyboard catchall\"
    MatchIsKeyboard \"on\"
    MatchDevicePath \"/dev/input/event*\"
    Driver \"libinput\"
    Option \"XkbLayout\" \"us,ru\"
    Option \"XkbOptions\" \"grp_led:scroll,grp:caps_toggle,grp:lwin_compose\"
EndSection
")

(operating-system
  ;; (kernel linux-nonfree)
  ;; (firmware (cons* radeon-RS780-firmware-non-free
  ;;                  RTL8188CE-firmware-non-free %base-firmware))
  (host-name "camelot")
  (timezone "Europe/Moscow")
  (locale "en_US.UTF-8")

  (bootloader (grub-configuration (device "/dev/sda")))
  (file-systems (cons (file-system
                        (device "root")
                        (title 'label)
                        (mount-point "/")
                        (type "ext4"))
                      %base-file-systems))

  (users (cons (user-account
                (name "camel")
                (comment "Camel")
                (group "users")
                (supplementary-groups '("wheel" "netdev"
                                        "audio" "video"))
                (home-directory "/home/camel"))
               %base-user-accounts))

  ;; This is where we specify system-wide packages.
  (packages (cons*
             evince
             font-dejavu
             ;; font-hack
             font-inconsolata
             font-liberation
             font-terminus
             font-ubuntu
             git
             ;; guile
             htop
             i3-wm
             icecat
             icedtea
             lm-sensors
             mesa
             mesa-utils
             nss-certs          ;for HTTPS access
             screen
             slim
             pavucontrol
             ;; perf-nonfree
             ruby
             rxvt-unicode
             tcpdump
             wget
             wicd
             wpa-supplicant
             xf86-input-evdev
             xf86-video-ati
             xf86-video-fbdev
             xf86-video-modesetting
             xorg-server
             xsensors
             unzip
             %base-packages))

  (services
   (cons*
    (lsh-service #:port-number 2222)
    (gnome-desktop-service)
    (xfce-desktop-service)
    (console-keymap-service "ru")
    (slim-service
     #:allow-empty-passwords? #f #:auto-login? #f
     #:startx (xorg-start-command
               #:configuration-file
               (xorg-configuration-file
                #:extra-config (list libinput.conf)
                #:drivers '("radeon" "vesa")
                #:resolutions
                '((1366 768) (1024 768)))))

    ;; (screen-locker-service slock)
    ;; (screen-locker-service xlockmore "xlock")
    ;; ;; The D-Bus clique.
    ;; (avahi-service)
    ;; (wicd-service)
    ;; (udisks-service)
    ;; (upower-service)
    ;; (colord-service)
    ;; (geoclue-service)
    ;; (polkit-service)
    ;; (elogind-service)
    ;; (dbus-service)
    ;; (ntp-service)
    ;; %base-services))

    (remove (lambda (service)
              (eq? (service-kind service) slim-service-type))
            %desktop-services)))
  ;; Allow resolution of '.local' host names with mDNS.
  (name-service-switch %mdns-host-lookup-nss))

  reply	other threads:[~2016-05-25  8:20 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2016-05-24 20:42 Customize %desktop-services Dmitry Nikolaev
2016-05-25  8:20 ` Alex Kost [this message]
  -- strict thread matches above, loose matches on Subject: below --
2016-06-01 13:14 Dmitry Nikolaev
2016-05-15 11:24 Dmitry Nikolaev
2016-05-16 20:20 ` Alex Kost
2016-05-12 19:45 Dmitry Nikolaev
2016-05-13 20:26 ` Alex Kost

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://guix.gnu.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87zirezgzv.fsf@gmail.com \
    --to=alezost@gmail.com \
    --cc=cameltheman@gmail.com \
    --cc=help-guix@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).