[bug#63501] [PATCH] hurd-boot: Symlink /hurd before setting up translators.

[Josselin Poiret via Guix-patches via <guix-patches@gnu.org>]

From: Josselin Poiret <dev@jpoiret.xyz>

* gnu/build/hurd-boot.scm (boot-hurd-system): Symlink /hurd before setting up
translators.
---

Hi everyone,

This should fix the Hurd not booting.

Enjoy! (and now we also need to fix the native Hurd compilation problems, but
that's for another patch)

 gnu/build/hurd-boot.scm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/gnu/build/hurd-boot.scm b/gnu/build/hurd-boot.scm
index abcf0304c2..95c15907dd 100644
--- a/gnu/build/hurd-boot.scm
+++ b/gnu/build/hurd-boot.scm
@@ -280,14 +280,14 @@ (define* (boot-hurd-system #:key (on-error 'debug))
             (system  (find-long-option "gnu.system" args))
             (to-load (find-long-option "gnu.load" args)))
 
-       (format #t "Setting-up essential translators...\n")
-       (setenv "PATH" (string-append system "/profile/bin"))
-       (set-hurd-device-translators)
-
        (false-if-exception (delete-file "/hurd"))
        (let ((hurd/hurd (readlink* (string-append system "/profile/hurd"))))
          (symlink hurd/hurd "/hurd"))
 
+       (format #t "Setting-up essential translators...\n")
+       (setenv "PATH" (string-append system "/profile/bin"))
+       (set-hurd-device-translators)
+
        (format #t "Starting pager...\n")
        (unless (zero? (system* "/hurd/mach-defpager"))
          (format #t "FAILED...Good luck!\n"))

base-commit: eb7312401ea89e634f8d686db71bacda58b2755f
-- 
2.40.1