From mboxrd@z Thu Jan 1 00:00:00 1970 From: swedebugia@riseup.net Subject: bug#31885: Bug when running guix system reconfigure after recent guix pull Date: Mon, 18 Jun 2018 12:24:47 -0700 Message-ID: <28fa8f6fd69553b57df3a960e6586e0a@riseup.net> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=_6ce863c3f1c73a802ad38b08473cb3de" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:38793) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fUznw-0007Xm-1X for bug-guix@gnu.org; Mon, 18 Jun 2018 15:27:10 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fUzns-0007sl-RY for bug-guix@gnu.org; Mon, 18 Jun 2018 15:27:08 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:47409) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1fUzns-0007sa-LN for bug-guix@gnu.org; Mon, 18 Jun 2018 15:27:04 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1fUznq-0005Mw-FQ for bug-guix@gnu.org; Mon, 18 Jun 2018 15:27:04 -0400 Sender: "Debbugs-submit" Resent-Message-ID: Received: from eggs.gnu.org ([2001:4830:134:3::10]:38337) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fUzll-0007KQ-2P for bug-guix@gnu.org; Mon, 18 Jun 2018 15:24:55 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fUzlh-0006uI-Oc for bug-guix@gnu.org; Mon, 18 Jun 2018 15:24:53 -0400 Received: from mx1.riseup.net ([198.252.153.129]:59477) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1fUzlh-0006tw-8n for bug-guix@gnu.org; Mon, 18 Jun 2018 15:24:49 -0400 Received: from piha.riseup.net (piha-pn.riseup.net [10.0.1.163]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "COMODO RSA Domain Validation Secure Server CA" (verified OK)) by mx1.riseup.net (Postfix) with ESMTPS id 200B21A0B62 for ; Mon, 18 Jun 2018 12:24:48 -0700 (PDT) Received: from [127.0.0.1] (localhost [127.0.0.1]) by piha.riseup.net with ESMTPSA id E78BE40653 for ; Mon, 18 Jun 2018 12:24:47 -0700 (PDT) List-Id: Bug reports for GNU Guix List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org Sender: "bug-Guix" To: 31885@debbugs.gnu.org --=_6ce863c3f1c73a802ad38b08473cb3de Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset=US-ASCII Ran guix pull twice on commit b4eae997fe5b928f179c34d281e9f2c3eccd3670 See config attached or here: https://paste.debian.net/1029776/ root@antelope ~# guix --version guile: warning: failed to install locale warning: failed to install locale: Invalid argument guix (GNU Guix) b4eae997fe5b928f179c34d281e9f2c3eccd3670 Copyright (C) 2018 the Guix authors root@antelope ~# .config/guix/current/bin/guix system reconfigure /etc/config.scm --cores=1 guile: warning: failed to install locale warning: failed to install locale: Invalid argument Backtrace: 12 (primitive-load "/root/.config/guix/current/bin/guix") In guix/ui.scm: 1557:12 11 (run-guix-command _ . _) In ice-9/boot-9.scm: 829:9 10 (catch _ _ # ?) 829:9 9 (catch _ _ # ?) In guix/scripts/system.scm: 1224:8 8 (_) 1094:6 7 (process-action _ _ _) In guix/store.scm: 1414:24 6 (run-with-store _ _ #:guile-for-build _ #:system _ # _) In guix/scripts/system.scm: 1107:13 5 (_ _) 805:18 4 (perform-action reconfigure #< kerne?> ?) In gnu/system.scm: 843:19 3 (operating-system-derivation _ #:container? _) In gnu/services.scm: 702:19 2 (instantiate-missing-services (#< ?)) In srfi/srfi-1.scm: 466:18 1 (fold # ?) In gnu/services.scm: 703:40 0 (_ _ _) gnu/services.scm:703:40: In procedure service-kind: Wrong type argument: #< slim: # allow-empty-passwords?: #t auto-login?: #t default-user: "annika" theme: #< base: # url: "git://git.savannah.gnu.org/guix/guix-artwork.git" commit: "6998d30425289b087c64f63e7415df2241e591db" recursive?: #f> gjomvsacge5nz76kqiyzbpiin32l7nn672voskuo7ahz3za56jga () 193e840> suffix: ("/slim")> theme-name: "0.x" xauth: # shepherd: # auto-login-session: "xfdesktop" startx: #< name: "startx" gexp: # name: "X-wrapper" gexp: #:out> "/lib/dri")) (setenv "XKB_BINDIR" (string-append #:out> "/bin")) (let ((X (string-append #:out> "/bin/X"))) (apply execl X X "-xkbdir" (string-append #:out> "/share/X11/xkb") "-config" # name: "xserver.conf" gexp: # (lambda (port) (define drivers (quote #)) (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 # base: # suffix: ("/share/fonts/X11/75dpi")> #< base: # suffix: ("/share/fonts/X11/100dpi")> #< base: # suffix: ("/share/fonts/X11/misc")> #< base: # suffix: ("/share/fonts/X11/cyrillic")> #< base: # suffix: ("/share/fonts/X11/misc")> #< base: # suffix: ("/share/fonts/X11/75dpi")>):out>)) (for-each (lambda (module) (format port " ModulePath \"~a\"~%" module)) (append (expand (quote # # # # # # # # # # # # # # #):out>)) (list # base: # suffix: ("/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 #)) drivers) "\n") port) (newline port) (for-each (lambda (config) (display config port)) (quote #))))) 2e5e090> guile: #f options: (#:local-build? #t)>:out> "-configdir" # name: "xorg.conf.d" gexp: # guile: #f options: (#:local-build? #t)>:out> (cdr (command-line))))) 2e7ce70> guile: #f path: ("/gnu/store/smr91vhrzakk8mf6ylwmmddnr7wgl1fp-guix-b4eae997f-modules" "/gnu/store/2rfa6337gb84bx4f2jzn5h9wfi3lhjik-guile-git-0.0-6.36f93c1/share/guile/site/2.2" "/gnu/store/1aglyrvw57cbw4njc2q4blmbqin3r7k2-guile-bytestructures-1.0.3/share/guile/site/2.2" "/gnu/store/6jjn9fsma94qa6y86qwiyyqfsm2mjkxy-guile-json-1.0.1/share/guile/site/2.2" "/gnu/store/5lmr2x0cl45x0f15hsbaw4y560gnwry3-guile-ssh-0.11.2/share/guile/site/2.2" "/gnu/store/r21yw2lkm4fr1n7x1nxgpqrjw0xkln9r-guile-sqlite3-0.0-4.10c13a7/share/guile/site/2.2" "/gnu/store/iv3yg0g269hnxc1aqk9r55aq3h72c6m1-module-import" "/gnu/store/iv3yg0g269hnxc1aqk9r55aq3h72c6m1-module-import" "/run/current-system/profile/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile")>:out> # name: "X-wrapper" gexp: #:out> "/lib/dri")) (setenv "XKB_BINDIR" (string-append #:out> "/bin")) (let ((X (string-append #:out> "/bin/X"))) (apply execl X X "-xkbdir" (string-append #:out> "/share/X11/xkb") "-config" # name: "xserver.conf" gexp: # (lambda (port) (define drivers (quote #)) (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 # base: # suffix: ("/share/fonts/X11/75dpi")> #< base: # suffix: ("/share/fonts/X11/100dpi")> #< base: # suffix: ("/share/fonts/X11/misc")> #< base: # suffix: ("/share/fonts/X11/cyrillic")> #< base: # suffix: ("/share/fonts/X11/misc")> #< base: # suffix: ("/share/fonts/X11/75dpi")>):out>)) (for-each (lambda (module) (format port " ModulePath \"~a\"~%" module)) (append (expand (quote # # # # # # # # # # # # # # #):out>)) (list # base: # suffix: ("/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 #)) drivers) "\n") port) (newline port) (for-each (lambda (config) (display config port)) (quote #))))) 2e5e090> guile: #f options: (#:local-build? #t)>:out> "-configdir" # name: "xorg.conf.d" gexp: # guile: #f options: (#:local-build? #t)>:out> (cdr (command-line))))) 2e7ce70> guile: #f path: ("/gnu/store/smr91vhrzakk8mf6ylwmmddnr7wgl1fp-guix-b4eae997f-modules" "/gnu/store/2rfa6337gb84bx4f2jzn5h9wfi3lhjik-guile-git-0.0-6.36f93c1/share/guile/site/2.2" "/gnu/store/1aglyrvw57cbw4njc2q4blmbqin3r7k2-guile-bytestructures-1.0.3/share/guile/site/2.2" "/gnu/store/6jjn9fsma94qa6y86qwiyyqfsm2mjkxy-guile-json-1.0.1/share/guile/site/2.2" "/gnu/store/5lmr2x0cl45x0f15hsbaw4y560gnwry3-guile-ssh-0.11.2/share/guile/site/2.2" "/gnu/store/r21yw2lkm4fr1n7x1nxgpqrjw0xkln9r-guile-sqlite3-0.0-4.10c13a7/share/guile/site/2.2" "/gnu/store/iv3yg0g269hnxc1aqk9r55aq3h72c6m1-module-import" "/gnu/store/iv3yg0g269hnxc1aqk9r55aq3h72c6m1-module-import" "/run/current-system/profile/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile")>:out> "-logverbose" "-verbose" "-nolisten" "tcp" "-terminate" (cdr (command-line))) 2e7cde0> guile: #f path: ("/gnu/store/smr91vhrzakk8mf6ylwmmddnr7wgl1fp-guix-b4eae997f-modules" "/gnu/store/2rfa6337gb84bx4f2jzn5h9wfi3lhjik-guile-git-0.0-6.36f93c1/share/guile/site/2.2" "/gnu/store/1aglyrvw57cbw4njc2q4blmbqin3r7k2-guile-bytestructures-1.0.3/share/guile/site/2.2" "/gnu/store/6jjn9fsma94qa6y86qwiyyqfsm2mjkxy-guile-json-1.0.1/share/guile/site/2.2" "/gnu/store/5lmr2x0cl45x0f15hsbaw4y560gnwry3-guile-ssh-0.11.2/share/guile/site/2.2" "/gnu/store/r21yw2lkm4fr1n7x1nxgpqrjw0xkln9r-guile-sqlite3-0.0-4.10c13a7/share/guile/site/2.2" "/gnu/store/iv3yg0g269hnxc1aqk9r55aq3h72c6m1-module-import" "/gnu/store/iv3yg0g269hnxc1aqk9r55aq3h72c6m1-module-import" "/run/current-system/profile/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site/2.2" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile/site" "/gnu/store/1mr5izrbxwd7cbq8m1xrqm45rzkibpsj-guile-2.2.3/share/guile")> sessreg: #> --=_6ce863c3f1c73a802ad38b08473cb3de Content-Transfer-Encoding: base64 Content-Type: text/plain; name=config.scm Content-Disposition: attachment; filename=config.scm; size=2534 OzsgVGhpcyBpcyBhbiBvcGVyYXRpbmcgc3lzdGVtIGNvbmZpZ3VyYXRpb24gdGVtcGxhdGUKOzsg Zm9yIGEgImRlc2t0b3AiIHNldHVwIHdpdGggR05PTUUgYW5kIFhmY2Ugd2hlcmUgdGhlCjs7IHJv b3QgcGFydGl0aW9uIGlzIGVuY3J5cHRlZCB3aXRoIExVS1MuCgoodXNlLW1vZHVsZXMgCgkoZ251 KSAKCShnbnUgc3lzdGVtIG5zcykgCgkoZ3VpeCBzdG9yZSkpCih1c2Utc2VydmljZS1tb2R1bGVz IGRlc2t0b3AgcG0geG9yZykKKHVzZS1wYWNrYWdlLW1vZHVsZXMgY2VydHMgbWF0ZSBnbm9tZSkK CihvcGVyYXRpbmctc3lzdGVtCiAgKGhvc3QtbmFtZSAiYW50ZWxvcGUiKQogICh0aW1lem9uZSAi RXVyb3BlL1BhcmlzIikKICAobG9jYWxlICJzdl9TRS51dGY4IikKCiAgOzsgQXNzdW1pbmcgL2Rl di9zZGEgaXMgdGhlIHRhcmdldCBoYXJkIGRpc2ssIGFuZCAibXktcm9vdCIKICA7OyBpcyB0aGUg bGFiZWwgb2YgdGhlIHRhcmdldCByb290IGZpbGUgc3lzdGVtLgogIChib290bG9hZGVyIChib290 bG9hZGVyLWNvbmZpZ3VyYXRpb24KICAgICAgICAgICAgICAgIChib290bG9hZGVyIGdydWItYm9v dGxvYWRlcikKICAgICAgICAgICAgICAgICh0YXJnZXQgIi9kZXYvc2RhIikKCQkobWVudS1lbnRy aWVzCgkJCShtZW51LWVudHJ5CgkJCQkobGFiZWwgIlVidW50dSAxNi4wNCIpCgkJCQkobGludXgg Ii9ib290L3ZtbGludXotNC40LjAtMTI4LWdlbmVyaWMiKQoJCQkJKGxpbnV4LWFyZ3VtZW50cyAn KCJyb290PS9kZXYvc2RhNSIpKQoJCQkJKGluaXRyZCAiL2Jvb3QvaW5pdHJkLmltZy00LjQuMC0x MjgtZ2VuZXJpYyIpKSkpKQoKICAoZmlsZS1zeXN0ZW1zIChjb25zIChmaWxlLXN5c3RlbQogICAg ICAgICAgICAgICAgICAgICAgICAoZGV2aWNlIChmaWxlLXN5c3RlbS1sYWJlbCAibXktcm9vdCIp KQogICAgICAgICAgICAgICAgICAgICAgICAobW91bnQtcG9pbnQgIi8iKQogICAgICAgICAgICAg ICAgICAgICAgICAodHlwZSAiZXh0NCIpKQogICAgICAgICAgICAgICAgICAgICAgJWJhc2UtZmls ZS1zeXN0ZW1zKSkKCiAgKHVzZXJzIChjb25zICh1c2VyLWFjY291bnQKICAgICAgICAgICAgICAg IChuYW1lICJzd2VkZWJ1Z2lhIikKICAgICAgICAgICAgICAgIChjb21tZW50ICJBbGljZSdzIGJy b3RoZXIiKQogICAgICAgICAgICAgICAgKGdyb3VwICJ1c2VycyIpCiAgICAgICAgICAgICAgICAo c3VwcGxlbWVudGFyeS1ncm91cHMgJygid2hlZWwiICJuZXRkZXYiCiAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAiYXVkaW8iICJ2aWRlbyIpKQogICAgICAgICAgICAgICAg KGhvbWUtZGlyZWN0b3J5ICIvaG9tZS9zd2VkZWJ1Z2lhIikpCiAgICAgICAgICAgICAgICViYXNl LXVzZXItYWNjb3VudHMpKQoKICA7OyBUaGlzIGlzIHdoZXJlIHdlIHNwZWNpZnkgc3lzdGVtLXdp ZGUgcGFja2FnZXMuCiAgKHBhY2thZ2VzIChjb25zKiBuc3MtY2VydHMgbWF0ZSBtYXRlLWFwcGxl dHMgICAgICAgICA7Zm9yIEhUVFBTIGFjY2VzcwogICAgICAgICAgICAgICAgICAgZ3ZmcyAgICAg ICAgICAgICAgO2ZvciB1c2VyIG1vdW50cwogICAgICAgICAgICAgICAgICAgJWJhc2UtcGFja2Fn ZXMpKQoKICA7OyBBZGQgR05PTUUgYW5kL29yIFhmY2UtLS13ZSBjYW4gY2hvb3NlIGF0IHRoZSBs b2ctaW4KICA7OyBzY3JlZW4gd2l0aCBGMS4gIFVzZSB0aGUgImRlc2t0b3AiIHNlcnZpY2VzLCB3 aGljaAogIDs7IGluY2x1ZGUgdGhlIFgxMSBsb2ctaW4gc2VydmljZSwgbmV0d29ya2luZyB3aXRo IFdpY2QsCiAgOzsgYW5kIG1vcmUuCiAgKHNlcnZpY2VzIChjb25zKiAKCQkoc2xpbS1jb25maWd1 cmF0aW9uCgkJCShhdXRvLWxvZ2luPyAjdCkKCQkJKGRlZmF1bHQtdXNlciAic3dlZGVidWdpYSIp CgkJCShhdXRvLWxvZ2luLXNlc3Npb24gInhmZGVza3RvcCIpKQoJCShndWl4LWNvbmZpZ3VyYXRp b24KOwkJCSM6YXV0aG9yaXplLWtleXMgKGNvbnMgIi9ob21lL3N3ZWRlYnVnaWEvYmVybGluLmd1 aXhzZC5vcmcucHViIgo7CQkJCQkJJWRlZmF1bHQtYXV0aG9yaXplZC1ndWl4LWtleXMpCgkJCShz dWJzdGl0dXRlLXVybHMgKGNvbnMJImh0dHBzOi8vYmVybGluLmd1aXhzZC5vcmciCgkJCQkJCSVk ZWZhdWx0LXN1YnN0aXR1dGUtdXJscykpKQoJCTs7IElzIHRoaXMgY29ycmVjdD8KOwkJKHRscC1z ZXJ2aWN5LXR5cGUKOwkJCSh0bHAtY29uZmlndXJhdGlvbgo7CQkJCTs7IFNob3VsZCBJIHVzZSBw YXJlbnRlc2VzIGluc3RlYWQgb2YgIiM6Ij8KOwkJCQkoY3B1LXNjYWxpbmctZ292ZW5vci1vbi1h YyAobGlzdCAiY29uc2VydmF0aXZlIikpCjsJCQkJKGNwdS1zY2FsaW5nLWdvdmVub3Itb24tYmF0 IChsaXN0ICJjb25zZXJ2YXRpdmUiKSkpKQoJCSh4ZmNlLWRlc2t0b3Atc2VydmljZSkKICAgICAg ICAgICAgICAgICAgICVkZXNrdG9wLXNlcnZpY2VzKSkKCiAgOzsgQWxsb3cgcmVzb2x1dGlvbiBv ZiAnLmxvY2FsJyBob3N0IG5hbWVzIHdpdGggbUROUy4KICA7OyhuYW1lLXNlcnZpY2Utc3dpdGNo ICVtZG5zLWhvc3QtbG9va3VwLW5zcykKKQo= --=_6ce863c3f1c73a802ad38b08473cb3de--