bug#19491: /etc/mtab give wrong entries for early-mounted items.

2015-01-02 Thread 宋文武
Notably, I have:
  /dev/sda1 /root ext4 rw,relatime,data=ordered 0 0
  none /root//dev devtmpfs rw 0 0

Which should be:
  /dev/sda1 / ...
  none /dev ...

Why not make /etc/mtab a symlink to /proc/self/mounts?





bug#18033: Add support for 'search-path-specifications' referring to files

2015-01-02 Thread Mark H Weaver
Hi Ludovic,

l...@gnu.org (Ludovic Courtès) writes:

> Commit af07095 extends ‘search-path-specification’ with a ‘file-type’
> field, which can be 'regular.
>
> Then, commit 7b21fe5 adds a ‘file-pattern’ field, to look for files
> matching a pattern recursively.
>
> Lastly, commit 2a8d440 uses these features for libxml2 and
> $XML_CATALOG_FILES.
>
> Comments welcome!

Something seems to have gone wrong here.  Trying to build 'emacs' on
current 'core-updates' (bf0baaf) on i686, I get this:

--8<---cut here---start->8---
mhw:~/guix-core-updates$ git describe
v0.8-499-gbf0baaf
mhw:~/guix-core-updates$ ./pre-inst-env guile
GNU Guile 2.0.11
Copyright (C) 1995-2014 Free Software Foundation, Inc.

Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.

Enter `,help' for help.
scheme@(guile-user)> ,use (guix scripts build)
scheme@(guile-user)> (guix-build "emacs")
ERROR: In procedure concatenate:
ERROR: In procedure append: Wrong type argument in position 23 (expecting empty 
list): #< variable: "XML_CATALOG_FILES" files: 
("xml") separator: " " file-type: regular file-pattern: "^catalog\\.xml$">

Entering a new prompt.  Type `,bt' for a backtrace or `,q' to continue.
scheme@(guile-user) [1]> ,bt
In ice-9/boot-9.scm:
   157:17 33 (catch srfi-34 # 
# #)
   157:17 32 (catch system-error # # …)
In guix/scripts/build.scm:
420:6 31 (#)
318:6 30 (options->derivations # ((argument . 
"emacs") (system . "i686-linux") (# . #t) …))
In srfi/srfi-1.scm:
   664:12 29 (filter-map # ((argument . #) …))
In guix/packages.scm:
   620:14 28 (cache # 
("i686-linux" . #t) #)
   869:10 27 (thunk)
801:6 26 (bag->derivation # #< name: 
"emacs-24.4" system: "i686-linux" target: #f b…> …)
In srfi/srfi-1.scm:
   578:27 25 (map # 
(("glib:bin" #) …))
In guix/packages.scm:
   662:16 24 (expand-input # # ("gl…" …) …)
   620:14 23 (cache # 
("i686-linux" . #f) #)
   869:10 22 (thunk)
801:6 21 (bag->derivation # #< name: 
"glib-2.42.1" system: "i686-linux" target: #f …> …)
In srfi/srfi-1.scm:
   578:27 20 (map # 
(("source" #) …))
In guix/packages.scm:
   662:16 19 (expand-input # # ("d…" …) …)
   620:14 18 (cache # 
("i686-linux" . #f) #)
   869:10 17 (thunk)
801:6 16 (bag->derivation # #< name: 
"dbus-1.8.12" system: "i686-linux" target: #f …> …)
In srfi/srfi-1.scm:
   578:27 15 (map # 
(("source" #http://dbus.freedesk…>) …))
In guix/packages.scm:
   662:16 14 (expand-input # # ("li…" …) …)
   620:14 13 (cache # 
("i686-linux" . #f) #)
   869:10 12 (thunk)
801:6 11 (bag->derivation # #< name: 
"libx11-1.6.2" system: "i686-linux" target: #f…> …)
In srfi/srfi-1.scm:
   576:29 10 (map # 
(("source" #) …))
In guix/packages.scm:
   662:16  9 (expand-input # # (# #) …)
   620:14  8 (cache # 
("i686-linux" . #f) #)
   869:10  7 (thunk)
801:6  6 (bag->derivation # #< name: 
"libxcb-1.11" system: "i686-linux" target: #f …> …)
In srfi/srfi-1.scm:
   578:27  5 (map # 
(("source" #) …))
In guix/packages.scm:
   662:16  4 (expand-input # # ("…" …) …)
   620:14  3 (cache # 
("i686-linux" . #f) #)
   869:10  2 (thunk)
   806:26  1 (bag->derivation # #< name: 
"libxslt-1.1.28" system: "i686-linux" target: …> …)
In unknown file:
   0 (concatenate (() () () () () () () () () () () () () () () () () 
(#< variabl…> …) …))
scheme@(guile-user) [1]>
--8<---cut here---end--->8---

  Mark