|
From: | Ludovic Courtès |
Subject: | [bug#33259] [PATCH 5/8] pack: Squashfs backend now honors '--localstatedir'. |
Date: | Tue, 06 Nov 2018 15:44:34 +0100 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux) |
Danny Milosavljevic <address@hidden> skribis: >> + (with-directory-excursion "squashfs-root" >> + (when (and (file-exists? (string-append bin >> + >> "/guile")) >> + (file-exists? "var/guix/db/db.sqlite") >> + (string=? (string-append >> #$%bootstrap-guile "/bin") >> + (pk 'binlink (readlink >> bin))) >> + (string=? (string-append #$profile >> "/bin") >> + (pk 'guilelink (readlink >> "bin")))) >> + (mkdir #$output)))))))) > > "pk" here on purpose? Can't hurt in a test, I suppose... Yeah. :-)
[Prev in Thread] | Current Thread | [Next in Thread] |