diff options
author | Jan (janneke) Nieuwenhuizen <janneke@gnu.org> | 2020-06-08 12:25:24 +0200 |
---|---|---|
committer | Jan Nieuwenhuizen <janneke@gnu.org> | 2020-06-19 10:40:53 +0200 |
commit | f25e8f76fec03e5a31c221e7427d6962ece1aa67 (patch) | |
tree | cce2f388f57851a110666bbc25d4fb4e595020b2 | |
parent | 951847ee3792f8fa57d2bd38d84d9fa9c276c0fa (diff) | |
download | guix-f25e8f76fec03e5a31c221e7427d6962ece1aa67.tar.gz |
hurd-boot: Use 'setxattr' instead of invoking settrans.
Note: Using `getxattr' on the Hurd instead of running showtrans does not work (yet?). * gnu/build/hurd-boot.scm (setup-translator): Use 'setxattr' instead of invoking settrans. * gnu/system.scm (hurd-multiboot-modules): Add --x-xattr-translator-records to enable xattr-embedding of translators.
-rw-r--r-- | gnu/build/hurd-boot.scm | 2 | ||||
-rw-r--r-- | gnu/system.scm | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/gnu/build/hurd-boot.scm b/gnu/build/hurd-boot.scm index f4b6dc734d..aea2ac3307 100644 --- a/gnu/build/hurd-boot.scm +++ b/gnu/build/hurd-boot.scm @@ -144,7 +144,7 @@ set." (chmod port mode))))) (catch 'system-error (lambda _ - (apply invoke "settrans" "--create" file-name command)) + (setxattr file-name "gnu.translator" (string-join command "\0" 'suffix))) (lambda (key . args) (let ((errno (system-error-errno (cons key args)))) (format (current-error-port) "~a: ~a\n" diff --git a/gnu/system.scm b/gnu/system.scm index d51691fe76..25cc63a9df 100644 --- a/gnu/system.scm +++ b/gnu/system.scm @@ -1191,6 +1191,7 @@ a list of <menu-entry>, to populate the \"old entries\" menu." "--device-master-port='${device-port}'" "--exec-server-task='${exec-task}'" "--store-type=typed" + "--x-xattr-translator-records" "'${root}'" "'$(task-create)'" "'$(task-resume)'")) (target (%current-target-system)) (libc (if target |