Sorry, substitution like this gives the next errors:
;; This is an operating system configuration template ;; for a "desktop" setup with GNOME and Xfce where the ;; root partition is encrypted with LUKS. (use-modules (gnu) (gnu system nss) (gnu services desktop) ;;(gnu services networking) ;;for tor (gnu services xorg) ;; (gnu packages libusb) ;; (gnu services networking) ;; (gnu services audio) ;; (gnu packages linux) ;; (gnu services dbus) ) (use-service-modules desktop) (use-package-modules certs gnome) (define %my-services (modify-services %base-services (guix-service-type config => (guix-configuration (inherit config) (substitute-urls (list "https://mirror.hydra.gnu.org <https://mirror.hydra.gnu.org>"; "https://hydra.gnu.org <https://hydra.gnu.org>"; "https://berlin.guixsd.org <https://berlin.guixsd.org>"; )))))) (operating-system (host-name "antelope") (timezone "Europe/Moscow") (locale "en_US.utf8") (bootloader (bootloader-configuration (bootloader grub-bootloader) (target "/dev/sda"))) (file-systems (cons (file-system (device "/dev/sda1") (mount-point "/") (type "ext4") ) %base-file-systems)) (swap-devices '("/dev/sda2")) (users (cons* (user-account (name "bob") (comment "bob is good too") (group "users") (supplementary-groups '("wheel" "netdev" "audio" "video")) (home-directory "/home/bob")) (user-account (name "alice") (comment "bobs sister") (group "users") (supplementary-groups '("wheel" "netdev" "audio" "video")) (home-directory "/home/alice")) (user-account (name "mom") (comment "mom") (group "users") (supplementary-groups '("wheel" "netdev" "audio" "video")) (home-directory "/home/mom")) %base-user-accounts)) ;; This is where we specify system-wide packages. (packages (cons* nss-certs ;for HTTPS access gvfs ;for user mounts %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 ;; NetworkManager, and more. (services (cons* ;;(tor-service) (xfce-desktop-service) (bluetooth-service) (modify-services %desktop-services (elogind-service-type c => (elogind-configuration (handle-lid-switch 'ignore))) (slim-service-type config => (slim-configuration (inherit config) (startx (xorg-start-command #:configuration-file (xorg-configuration-file #:extra-config '( "Section \"InputClass\" Identifier \"keyboard-all\" Option \"XkbLayout\" \"dvorak\" MatchIsKeyboard \"on\" EndSection Section \"InputClass\" Identifier \"touchpad-all\" MatchIsTouchpad \"on\" Option \"DisableWhileTyping\" \"on\" Option \"Tapping\" \"on\" EndSection" ) ) ) ) ) ) );;end of moify desktop-srvices %my-services ));;end of services ;; Allow resolution of '.local' host names with mDNS. (name-service-switch %mdns-host-lookup-nss)) # guix system reconfigure /etc/config.scm Backtrace: 13 (primitive-load "/root/.config/guix/current/bin/guix") In guix/ui.scm: 1583:12 12 (run-guix-command _ . _) In ice-9/boot-9.scm: 829:9 11 (catch _ _ #<procedure 7fdf17689458 at guix/ui.scm:615…> …) 829:9 10 (catch _ _ #<procedure 7fdf17689470 at guix/ui.scm:733…> …) In guix/scripts/system.scm: 1262:8 9 (_) In guix/status.scm: 600:4 8 (call-with-status-report _ _) In guix/scripts/system.scm: 1132:6 7 (process-action _ _ _) In guix/store.scm: 1605:24 6 (run-with-store _ _ #:guile-for-build _ #:system _ # _) In guix/scripts/system.scm: 1145:13 5 (_ _) 840:18 4 (perform-action reconfigure #<<operating-system> kerne…> …) In gnu/system.scm: 846:19 3 (operating-system-derivation _ #:container? _) In gnu/services.scm: 737:6 2 (instantiate-missing-services _) In srfi/srfi-1.scm: 466:18 1 (fold #<procedure 7fdf0a88dcc8 at gnu/services.scm:737…> …) In gnu/services.scm: 738:27 0 (_ (#<<service> type: #<service-type slim 159e7d0> …> …) …) gnu/services.scm:738:27: In procedure struct_vtable: Wrong type argument in position 1 (expecting struct): (#<<service> type: #<service-type slim 159e7d0> value: #<<slim-configuration> slim: #<package slim@1.3.6 gnu/packages/display-managers.scm:310 31a9600> allow-empty-passwords?: #t auto-login?: #f default-user: "" theme: #<file-append #<origin #<<git-reference> url: "git://git.savannah.gnu.org/guix/guix-artwork.git" commit: "6998d30425289b087c64f63e7415df2241e591db" recursive?: #f> gjomvsacge5nz76kqiyzbpiin32l7nn672voskuo7ahz3za56jga () 300ec00> "/slim"> theme-name: "0.x" xauth: #<package xauth@1.0.10 gnu/packages/xorg.scm:1996 2d76600> shepherd: #<package shepherd@0.5.0 gnu/packages/admin.scm:174 2ccbcc0> auto-login-session: #f startx: #<<program-file> name: "startx" gexp: #<gexp (apply execl #<gexp-input #<<program-file> name: "X-wrapper" gexp: #<gexp (begin (setenv "XORG_DRI_DRIVER_PATH" (string-append #<gexp-input #<package mesa@18.1.5 gnu/packages/gl.scm:225 29eaf00>:out> "/lib/dri")) (setenv "XKB_BINDIR" (string-append #<gexp-input #<package xkbcomp@1.4.2 gnu/packages/xorg.scm:3754 2ae2780>:out> "/bin")) (let ((X (string-append #<gexp-input #<package xorg-server@1.20.2 gnu/packages/xorg.scm:5066 1dce900>:out> "/bin/X"))) (apply execl X X "-xkbdir" (string-append #<gexp-input #<package xkeyboard-config@2.23.1 gnu/packages/xorg.scm:3830 2ae2540>:out> "/share/X11/xkb") "-config" #<gexp-input #<<computed-file> name: "xserver.conf" gexp: #<gexp (begin (use-modules (ice-9 match) (srfi srfi-1) (srfi srfi-26)) (call-with-output-file #<gexp-output out> (lambda (port) (define drivers (quote #<gexp-input ():out>)) (define (device-section driver) (string-append "\nSection \"Device\"\n Identifier \"device-" driver "\"\n Driver \"" driver "\"\nEndSection")) (define (screen-section driver resolutions) (string-append "\nSection \"Screen\"\n Identifier \"screen-" driver "\"\n Device \"device-" driver "\"\n SubSection \"Display\"\n Modes " (string-join (map (match-lambda ((x y) (string-append "\"" (number->string x) "x" (number->string y) "\""))) resolutions)) "\n EndSubSection\nEndSection")) (define (expand modules) (append-map (lambda (module) (filter-map (lambda (directory) (let ((full (string-append module directory))) (and (file-exists? full) full))) (quote ("/lib/xorg/modules/drivers" "/lib/xorg/modules/input" "/lib/xorg/modules/multimedia" "/lib/xorg/modules/extensions")))) modules)) (display "Section \"Files\"\n" port) (for-each (lambda (font) (format port " FontPath \"~a\"~%" font)) (quote #<gexp-input (#<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/75dpi"> #<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/100dpi"> #<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/misc"> #<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/cyrillic"> #<file-append #<package font-misc-misc@1.1.2 gnu/packages/xorg.scm:716 2d69a80> "/share/fonts/X11/misc"> #<file-append #<package font-adobe75dpi@1.0.3 gnu/packages/xorg.scm:491 2d5f180> "/share/fonts/X11/75dpi">):out>)) (for-each (lambda (module) (format port " ModulePath \"~a\"~%" module)) (append (expand (quote #<gexp-input (#<package xf86-video-vesa@2.4.0 gnu/packages/xorg.scm:3411 2d83240> #<package xf86-video-fbdev@0.5.0 gnu/packages/xorg.scm:2728 2d7d300> #<package xf86-video-ati@18.0.1 gnu/packages/xorg.scm:2671 2d7d480> #<package xf86-video-cirrus@1.5.3 gnu/packages/xorg.scm:2699 2d7d3c0> #<package xf86-video-intel@2.99.917-10.d7dfab6 gnu/packages/xorg.scm:2910 2d83f00> #<package xf86-video-mach64@6.9.6 gnu/packages/xorg.scm:2957 2d83e40> #<package xf86-video-nouveau@1.0.15 gnu/packages/xorg.scm:3093 2d83b40> #<package xf86-video-nv@2.1.21 gnu/packages/xorg.scm:3066 2d83c00> #<package xf86-video-sis@0.10.9 gnu/packages/xorg.scm:3252 2d836c0> #<package xf86-input-libinput@0.28.1 gnu/packages/xorg.scm:2449 2d7da80> #<package xf86-input-evdev@2.10.6 gnu/packages/xorg.scm:2415 2d7db40> #<package xf86-input-keyboard@1.9.0 gnu/packages/xorg.scm:2509 2d7d900> #<package xf86-input-mouse@1.9.3 gnu/packages/xorg.scm:2533 2d7d840> #<package xf86-input-synaptics@1.9.1 gnu/packages/xorg.scm:2565 2d7d780> #<package xorg-server@1.20.2 gnu/packages/xorg.scm:5066 1dce900>):out>)) (list #<gexp-input #<file-append #<package xorg-server@1.20.2 gnu/packages/xorg.scm:5066 1dce900> "/lib/xorg/modules">:out>))) (display "EndSection\n" port) (display "\nSection \"ServerFlags\"\n Option \"AllowMouseOpenFail\" \"on\"\nEndSection\n" port) (display (string-join (map device-section drivers) "\n") port) (newline port) (display (string-join (map (cut screen-section <> (quote #<gexp-input ():out>)) drivers) "\n") port) (newline port) (for-each (lambda (config) (display config port)) (quote #<gexp-input ("Section \"InputClass\"\n Identifier \"keyboard-all\"\n Option \"XkbLayout\" \"dvorak\"\n MatchIsKeyboard \"on\"\nEndSection\nSection \"InputClass\"\n Identifier \"touchpad-all\"\n MatchIsTouchpad \"on\"\n Option \"DisableWhileTyping\" \"on\"\n Option \"Tapping\" \"on\"\nEndSection"):out>))))) 17bf3f0> guile: #f options: (#:local-build? #t)>:out> "-configdir" #<gexp-input #<<computed-file> name: "xorg.conf.d" gexp: #<gexp 17bf360> guile: #f options: (#:local-build? #t)>:out> (cdr (command-line))))) 17bf1e0> guile: #f path: ("/gnu/store/fyxyhwqpbknr608rgpiwp9dn9jins0pc-guix-7b63047c9-modules" "/gnu/store/qbzw2ygy1nq2h0nq6sl9cgg1c5mq5g8z-guile-gcrypt-0.1.0/share/guile/site/2.2" "/gnu/store/c63g5242rs04ipx1zrkma9zxvs8782sj-gnutls-3.5.18/share/guile/site/2.2" "/gnu/store/i6d55i58fjld9cqi96g29npwhxh31wra-guile-git-0.1.0/share/guile/site/2.2" "/gnu/store/1aglyrvw57cbw4njc2q4blmbqin3r7k2-guile-bytestructures-1.0.3/share/guile/site/2.2" "/gnu/store/sw3wxk3ylxd1kc2z4z4kb5191x9pf17n-guile-json-1.2.0/share/guile/site/2.2" "/gnu/store/zib3xxlchl0dps78yriy8rxrfdfvwc2n-guile-ssh-0.11.3/share/guile/site/2.2" "/gnu/store/rjp81r0sgvix8cplfgqyhyhmyxxk35a6-guile-sqlite3-0.1.0/share/guile/site/2.2" "/gnu/store/9970qxhisnrr8cq4rq25zrc4698b037b-module-import" "/gnu/store/9970qxhisnrr8cq4rq25zrc4698b037b-module-import" "/run/current-system/profile/share/guile/site/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/site/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/site" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile")>:out> #<gexp-input #<<program-file> name: "X-wrapper" gexp: #<gexp (begin (setenv "XORG_DRI_DRIVER_PATH" (string-append #<gexp-input #<package mesa@18.1.5 gnu/packages/gl.scm:225 29eaf00>:out> "/lib/dri")) (setenv "XKB_BINDIR" (string-append #<gexp-input #<package xkbcomp@1.4.2 gnu/packages/xorg.scm:3754 2ae2780>:out> "/bin")) (let ((X (string-append #<gexp-input #<package xorg-server@1.20.2 gnu/packages/xorg.scm:5066 1dce900>:out> "/bin/X"))) (apply execl X X "-xkbdir" (string-append #<gexp-input #<package xkeyboard-config@2.23.1 gnu/packages/xorg.scm:3830 2ae2540>:out> "/share/X11/xkb") "-config" #<gexp-input #<<computed-file> name: "xserver.conf" gexp: #<gexp (begin (use-modules (ice-9 match) (srfi srfi-1) (srfi srfi-26)) (call-with-output-file #<gexp-output out> (lambda (port) (define drivers (quote #<gexp-input ():out>)) (define (device-section driver) (string-append "\nSection \"Device\"\n Identifier \"device-" driver "\"\n Driver \"" driver "\"\nEndSection")) (define (screen-section driver resolutions) (string-append "\nSection \"Screen\"\n Identifier \"screen-" driver "\"\n Device \"device-" driver "\"\n SubSection \"Display\"\n Modes " (string-join (map (match-lambda ((x y) (string-append "\"" (number->string x) "x" (number->string y) "\""))) resolutions)) "\n EndSubSection\nEndSection")) (define (expand modules) (append-map (lambda (module) (filter-map (lambda (directory) (let ((full (string-append module directory))) (and (file-exists? full) full))) (quote ("/lib/xorg/modules/drivers" "/lib/xorg/modules/input" "/lib/xorg/modules/multimedia" "/lib/xorg/modules/extensions")))) modules)) (display "Section \"Files\"\n" port) (for-each (lambda (font) (format port " FontPath \"~a\"~%" font)) (quote #<gexp-input (#<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/75dpi"> #<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/100dpi"> #<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/misc"> #<file-append #<package font-alias@1.0.3 gnu/packages/xorg.scm:520 2d5f0c0> "/share/fonts/X11/cyrillic"> #<file-append #<package font-misc-misc@1.1.2 gnu/packages/xorg.scm:716 2d69a80> "/share/fonts/X11/misc"> #<file-append #<package font-adobe75dpi@1.0.3 gnu/packages/xorg.scm:491 2d5f180> "/share/fonts/X11/75dpi">):out>)) (for-each (lambda (module) (format port " ModulePath \"~a\"~%" module)) (append (expand (quote #<gexp-input (#<package xf86-video-vesa@2.4.0 gnu/packages/xorg.scm:3411 2d83240> #<package xf86-video-fbdev@0.5.0 gnu/packages/xorg.scm:2728 2d7d300> #<package xf86-video-ati@18.0.1 gnu/packages/xorg.scm:2671 2d7d480> #<package xf86-video-cirrus@1.5.3 gnu/packages/xorg.scm:2699 2d7d3c0> #<package xf86-video-intel@2.99.917-10.d7dfab6 gnu/packages/xorg.scm:2910 2d83f00> #<package xf86-video-mach64@6.9.6 gnu/packages/xorg.scm:2957 2d83e40> #<package xf86-video-nouveau@1.0.15 gnu/packages/xorg.scm:3093 2d83b40> #<package xf86-video-nv@2.1.21 gnu/packages/xorg.scm:3066 2d83c00> #<package xf86-video-sis@0.10.9 gnu/packages/xorg.scm:3252 2d836c0> #<package xf86-input-libinput@0.28.1 gnu/packages/xorg.scm:2449 2d7da80> #<package xf86-input-evdev@2.10.6 gnu/packages/xorg.scm:2415 2d7db40> #<package xf86-input-keyboard@1.9.0 gnu/packages/xorg.scm:2509 2d7d900> #<package xf86-input-mouse@1.9.3 gnu/packages/xorg.scm:2533 2d7d840> #<package xf86-input-synaptics@1.9.1 gnu/packages/xorg.scm:2565 2d7d780> #<package xorg-server@1.20.2 gnu/packages/xorg.scm:5066 1dce900>):out>)) (list #<gexp-input #<file-append #<package xorg-server@1.20.2 gnu/packages/xorg.scm:5066 1dce900> "/lib/xorg/modules">:out>))) (display "EndSection\n" port) (display "\nSection \"ServerFlags\"\n Option \"AllowMouseOpenFail\" \"on\"\nEndSection\n" port) (display (string-join (map device-section drivers) "\n") port) (newline port) (display (string-join (map (cut screen-section <> (quote #<gexp-input ():out>)) drivers) "\n") port) (newline port) (for-each (lambda (config) (display config port)) (quote #<gexp-input ("Section \"InputClass\"\n Identifier \"keyboard-all\"\n Option \"XkbLayout\" \"dvorak\"\n MatchIsKeyboard \"on\"\nEndSection\nSection \"InputClass\"\n Identifier \"touchpad-all\"\n MatchIsTouchpad \"on\"\n Option \"DisableWhileTyping\" \"on\"\n Option \"Tapping\" \"on\"\nEndSection"):out>))))) 17bf3f0> guile: #f options: (#:local-build? #t)>:out> "-configdir" #<gexp-input #<<computed-file> name: "xorg.conf.d" gexp: #<gexp 17bf360> guile: #f options: (#:local-build? #t)>:out> (cdr (command-line))))) 17bf1e0> guile: #f path: ("/gnu/store/fyxyhwqpbknr608rgpiwp9dn9jins0pc-guix-7b63047c9-modules" "/gnu/store/qbzw2ygy1nq2h0nq6sl9cgg1c5mq5g8z-guile-gcrypt-0.1.0/share/guile/site/2.2" "/gnu/store/c63g5242rs04ipx1zrkma9zxvs8782sj-gnutls-3.5.18/share/guile/site/2.2" "/gnu/store/i6d55i58fjld9cqi96g29npwhxh31wra-guile-git-0.1.0/share/guile/site/2.2" "/gnu/store/1aglyrvw57cbw4njc2q4blmbqin3r7k2-guile-bytestructures-1.0.3/share/guile/site/2.2" "/gnu/store/sw3wxk3ylxd1kc2z4z4kb5191x9pf17n-guile-json-1.2.0/share/guile/site/2.2" "/gnu/store/zib3xxlchl0dps78yriy8rxrfdfvwc2n-guile-ssh-0.11.3/share/guile/site/2.2" "/gnu/store/rjp81r0sgvix8cplfgqyhyhmyxxk35a6-guile-sqlite3-0.1.0/share/guile/site/2.2" "/gnu/store/9970qxhisnrr8cq4rq25zrc4698b037b-module-import" "/gnu/store/9970qxhisnrr8cq4rq25zrc4698b037b-module-import" "/run/current-system/profile/share/guile/site/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/site/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/site" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile")>:out> "-logverbose" "-verbose" "-nolisten" "tcp" "-terminate" (cdr (command-line))) 17bf150> guile: #f path: ("/gnu/store/fyxyhwqpbknr608rgpiwp9dn9jins0pc-guix-7b63047c9-modules" "/gnu/store/qbzw2ygy1nq2h0nq6sl9cgg1c5mq5g8z-guile-gcrypt-0.1.0/share/guile/site/2.2" "/gnu/store/c63g5242rs04ipx1zrkma9zxvs8782sj-gnutls-3.5.18/share/guile/site/2.2" "/gnu/store/i6d55i58fjld9cqi96g29npwhxh31wra-guile-git-0.1.0/share/guile/site/2.2" "/gnu/store/1aglyrvw57cbw4njc2q4blmbqin3r7k2-guile-bytestructures-1.0.3/share/guile/site/2.2" "/gnu/store/sw3wxk3ylxd1kc2z4z4kb5191x9pf17n-guile-json-1.2.0/share/guile/site/2.2" "/gnu/store/zib3xxlchl0dps78yriy8rxrfdfvwc2n-guile-ssh-0.11.3/share/guile/site/2.2" "/gnu/store/rjp81r0sgvix8cplfgqyhyhmyxxk35a6-guile-sqlite3-0.1.0/share/guile/site/2.2" "/gnu/store/9970qxhisnrr8cq4rq25zrc4698b037b-module-import" "/gnu/store/9970qxhisnrr8cq4rq25zrc4698b037b-module-import" "/run/current-system/profile/share/guile/site/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/site/2.2" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile/site" "/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/share/guile")> sessreg: #<package sessreg@1.1.1 gnu/packages/xorg.scm:1784 2d76b40>>> #<<service> type: #<service-type screen-locker 159e780> value: #<<screen-locker> name: "slock" program: #<file-append #<package slock@1.4 gnu/packages/suckless.scm:199 254aa80> "/bin/ slock"> empty?: #f>> #<<service> type: #<service-type screen-locker 159e780> value: #<<screen-locker> name: "xlock" program: #<file-append #<package xlockmore@5.56 gnu/packages/xdisorg.scm:639 25b5a80> "/bin/ xlock"> empty?: #f>> #<<service> type: #<service-type mtp 1af96e0> value: (#<package libmtp@1.1.15 gnu/packages/libusb.scm:304 2a34180>)> #<<service> type: #<service-type network-manager 159e460> value: #<<network-manager-configuration> network-manager: #<package network-manager@1.8.4 gnu/packages/gnome.scm:5046 29a0480> dns: "default" vpn-plugins: ()>> #<<service> type: #<service-type wpa-supplicant 159e370> value: #<<wpa-supplicant-configuration> wpa-supplicant: #<package wpa-supplicant@2.6 gnu/packages/admin.scm:1143 2ce1cc0> pid-file: "/var/run/wpa_supplicant.pid" dbus?: #t interface: #f config-file: #f extra-options: ()>> #<<service> type: #<service-type avahi 159e820> value: #<<avahi-configuration> avahi: #<package avahi@0.7 gnu/packages/avahi.scm:35 2c91540> debug?: #f host-name: #f publish?: #t publish-workstation?: #t ipv4?: #t ipv6?: #t wide-area?: #f domains-to-browse: ()>> #<<service> type: #<service-type udisks 159e0f0> value: #<<udisks-configuration> udisks: #<package udisks@2.7.7 gnu/packages/freedesktop.scm:623 29d6f00>>> #<<service> type: #<service-type upower 159e230> value: #<<upower-configuration> upower: #<package upower@0.99.8 gnu/packages/gnome.scm:2934 298f480> watts-up-pro?: #f poll-batteries?: #t ignore-lid?: #f use-percentage-for-policy?: #f percentage-low: 10 percentage-critical: 3 percentage-action: 2 time-low: 1200 time-critical: 300 time-action: 120 critical-power-action: hybrid-sleep>> #<<service> type: #<service-type accountsservice 159e050> value: #<package accountsservice@0.6.50 gnu/packages/freedesktop.scm:723 29d6e40>> #<<service> type: #<service-type colord 159e140> value: #<package colord@1.1.8 gnu/packages/gnome.scm:2786 298f6c0>> #<<service> type: #<service-type geoclue 159e1e0> value: #<<geoclue-configuration> geoclue: #<package geoclue@2.4.8 gnu/packages/gnome.scm:2850 298f600> whitelist: () wifi-geolocation-url: "https://location.services.mozilla.com/v1/geolocate?key=geoclue <https://location.services.mozilla.com/v1/geolocate?key=geoclue>" submit-data?: #f wifi-submission-url: "https://location.services.mozilla.com/v1/submit?key=geoclue <https://location.services.mozilla.com/v1/submit?key=geoclue>" submission-nick: "geoclue" applications: ("[gnome-datetime-panel]\nallowed=true\nsystem=true\nusers=\n" "[epiphany]\nallowed=true\nsystem=false\nusers=\n" "[firefox]\nallowed=true\nsystem=false\nusers=\n")>> #<<service> type: #<service-type polkit 159e870> value: #<<polkit-configuration> polkit: #<package polkit@0.115 gnu/packages/polkit.scm:44 26e10c0> actions: ()>> #<<service> type: #<service-type elogind 159e0a0> value: #<<elogind-configuration> elogind: #<package elogind@232.4 gnu/packages/freedesktop.scm:230 29cb6c0> kill-user-processes?: #f kill-only-users: () kill-exclude-users: ("root") inhibit-delay-max-seconds: 5 handle-power-key: poweroff handle-suspend-key: suspend handle-hibernate-key: ignore handle-lid-switch: ignore handle-lid-switch-docked: ignore power-key-ignore-inhibited?: #f suspend-key-ignore-inhibited?: #f hibernate-key-ignore-inhibited?: #f lid-switch-ignore-inhibited?: #t holdoff-timeout-seconds: 30 idle-action: ignore idle-action-seconds: 1800 runtime-directory-size-percent: 10 runtime-directory-size: #f remove-ipc?: #t suspend-state: ("mem" "standby" "freeze") suspend-mode: () hibernate-state: ("disk") hibernate-mode: ("platform" "shutdown") hybrid-sleep-state: ("disk") hybrid-sleep-mode: ("suspend" "platform" "shutdown")>> #<<service> type: #<service-type dbus 159e8c0> value: #<<dbus-configuration> dbus: #<package dbus@1.12.6 gnu/packages/glib.scm:81 2acf540> services: ()>> #<<service> type: #<service-type ntp 159e640> value: #<<ntp-configuration> ntp: #<package ntp@4.2.8p12 gnu/packages/ntp.scm:41 31fa240> servers: ("0.guix.pool.ntp.org" "1.guix.pool.ntp.org" "2.guix.pool.ntp.org" "3.guix.pool.ntp.org") allow-large-adjustment?: #f>> #<<service> type: #<service-type x11-socket-directory 1af9780> value: #<gexp (begin (use-modules (guix build utils)) (let ((directory "/tmp/.X11-unix")) (mkdir-p directory) (chmod directory 511))) 3253f90>> #<<service> type: #<service-type alsa 159e280> value: #<<alsa-configuration> alsa-plugins: #<package alsa-plugins@1.1.6 gnu/packages/linux.scm:1060 2c73f00> pulseaudio?: #t extra-options: "">> #<<service> type: #<service-type login 159edc0> value: #<<login-configuration> motd: #<<plain-file> name: "motd" content: "This is the GNU operating system, welcome!\n\n" references: ()> allow-empty-passwords?: #t>> #<<service> type: #<service-type virtual-terminal 159eeb0> value: #t> #<<service> type: #<service-type console-fonts 159ee10> value: (("tty1" . "LatGrkCyr-8x16") ("tty2" . "LatGrkCyr-8x16") ("tty3" . "LatGrkCyr-8x16") ("tty4" . "LatGrkCyr-8x16") ("tty5" . "LatGrkCyr-8x16") ("tty6" . "LatGrkCyr-8x16"))> #<<service> type: #<service-type agetty 159ed70> value: #<<agetty-configuration> agetty: #<package util-linux@2.32 gnu/packages/linux.scm:581 2c6c9c0> tty: #f term: "vt100" baud-rate: #f auto-login: #f login-program: #<file-append #<package shadow@4.6 gnu/packages/admin.scm:366 2ccb840> "/bin/login"> login-pause?: #f eight-bits?: #f no-reset?: #f remote?: #f flow-control?: #f host: #f no-issue?: #f init-string: #f no-clear?: #f local-line: #f extract-baud?: #f skip-login?: #f no-newline?: #f login-options: #f chroot: #f hangup?: #f keep-baud?: #f timeout: #f detect-case?: #f wait-cr?: #f no-hints?: #f no-hostname?: #f long-hostname?: #f erase-characters: #f kill-characters: #f chdir: #f delay: #f nice: #f extra-options: ("-L")>> #<<service> type: #<service-type mingetty 159ed20> value: #<<mingetty-configuration> mingetty: #<package mingetty@1.08 gnu/packages/admin.scm:423 2ccb780> tty: "tty1" auto-login: #f login-program: #f login-pause?: #f>> #<<service> type: #<service-type mingetty 159ed20> value: #<<mingetty-configuration> mingetty: #<package mingetty@1.08 gnu/packages/admin.scm:423 2ccb780> tty: "tty2" auto-login: #f login-program: #f login-pause?: #f>> #<<service> type: #<service-type mingetty 159ed20> value: #<<mingetty-configuration> mingetty: #<package mingetty@1.08 gnu/packages/admin.scm:423 2ccb780> tty: "tty3" auto-login: #f login-program: #f login-pause?: #f>> #<<service> type: #<service-type mingetty 159ed20> value: #<<mingetty-configuration> mingetty: #<package mingetty@1.08 gnu/packages/admin.scm:423 2ccb780> tty: "tty4" auto-login: #f login-program: #f login-pause?: #f>> #<<service> type: #<service-type mingetty 159ed20> value: #<<mingetty-configuration> mingetty: #<package mingetty@1.08 gnu/packages/admin.scm:423 2ccb780> tty: "tty5" auto-login: #f login-program: #f login-pause?: #f>> #<<service> type: #<service-type mingetty 159ed20> value: #<<mingetty-configuration> mingetty: #<package mingetty@1.08 gnu/packages/admin.scm:423 2ccb780> tty: "tty6" auto-login: #f login-program: #f login-pause?: #f>> #<<service> type: #<service-type static-networking 159e960> value: (#<<static-networking> interface: "lo" ip: "127.0.0.1" netmask: #f gateway: #f provision: (loopback) requirement: () name-servers: ()>)> #<<service> type: #<service-type syslog 159ec80> value: #<<syslog-configuration> syslogd: #<file-append #<package inetutils@1.9.4 gnu/packages/admin.scm:332 2ccb900> "/libexec/syslogd"> config-file: #<<plain-file> name: "syslog.conf" content: "\n # Log all error messages, authentication messages of\n # level notice or higher and anything of level err or\n # higher to the console.\n # Don't log private authentication messages!\n *.alert;auth.notice;authpriv.none /dev/console\n\n # Log anything (except mail) of level info or higher.\n # Don't log private authentication messages!\n *.info;mail.none;authpriv.none /var/log/messages\n\n # Like /var/log/messages, but also including \"debug\"-level logs.\n *.debug;mail.none;authpriv.none /var/log/debug\n\n # Same, in a different place.\n *.info;mail.none;authpriv.none /dev/tty12\n\n # The authpriv file has restricted access.\n authpriv.* /var/log/secure\n\n # Log all the mail messages in one place.\n mail.* /var/log/maillog\n" references: ()>>> #<<service> type: #<service-type urandom-seed 1af98c0> value: #f> #<<service> type: #<service-type guix 159ebe0> value: #<<guix-configuration> guix: #<package guix@0.15.0-6.f9a8fce gnu/packages/package-management.scm:107 201e900> build-group: "guixbuild" build-accounts: 10 authorize-key?: #t authorized-keys: (#<file-append #<package guix@0.15.0-6.f9a8fce gnu/packages/package-management.scm:107 201e900> "/share/guix/hydra.gnu.org.pub"> #<file-append #<package guix@0.15.0-6.f9a8fce gnu/packages/package-management.scm:107 201e900> "/share/guix/berlin.guixsd.org.pub">) use-substitutes?: #t substitute-urls: ("https://mirror.hydra.gnu.org <https://mirror.hydra.gnu.org>") chroot-directories: () max-silent-time: 0 timeout: 0 log-compression: bzip2 extra-options: () log-file: "/var/log/guix-daemon.log" http-proxy: #f tmpdir: #f>> #<<service> type: #<service-type nscd 159ecd0> value: #<<nscd-configuration> log-file: "/var/log/nscd.log" debug-level: 0 caches: (#<<nscd-cache> database: hosts positive-time-to-live: 43200 negative-time-to-live: 20 suggested-size: 211 check-files?: #t persistent?: #t shared?: #t max-database-size: 33554432 auto-propagate?: #t> #<<nscd-cache> database: services positive-time-to-live: 86400 negative-time-to-live: 3600 suggested-size: 211 check-files?: #t persistent?: #t shared?: #t max-database-size: 33554432 auto-propagate?: #t>) name-services: () glibc: #<package glibc@2.27 gnu/packages/commencement.scm:668 2eadb40>>> #<<service> type: #<service-type udev 159eaf0> value: #<<udev-configuration> udev: #<package eudev@3.2.5 gnu/packages/linux.scm:2042 2c7bd80> rules: (#<package lvm2@2.02.177 gnu/packages/linux.scm:2104 2c7bc00> #<package fuse@2.9.8 gnu/packages/linux.scm:1635 2c73600> #<package alsa-utils@1.1.6 gnu/packages/linux.scm:1013 2c6c000> #<package crda@3.18 gnu/packages/linux.scm:2240 2c7b9c0>)>> #<<service> type: #<service-type special-files 1af9dc0> value: (("/bin/sh" #<file-append #<package bash@4.4.19 gnu/packages/bash.scm:119 294a6c0> "/bin/sh">))>)
