From e78d5ae792397e49fbb3cd41911f0d576fe901a0 Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Sat, 19 Mar 2016 20:51:44 +0100 Subject: Move DEBIAN_FRONTEND up, because with-running-system is too late We already call dpkg-reconfigure tzdata before with-running-system... --- vps-builder.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/vps-builder.scm b/vps-builder.scm index 5b15ba6..5397878 100644 --- a/vps-builder.scm +++ b/vps-builder.scm @@ -125,10 +125,12 @@ (dynamic-wind (lambda () (set! tempdir (create-temporary-directory)) + (setenv "DEBIAN_FRONTEND" "noninteractive") (run* (mount -o loop ,device ,tempdir))) (lambda () (proc tempdir)) (lambda () (run* (umount ,tempdir)) + (unsetenv "DEBIAN_FRONTEND") (delete-directory tempdir #t) (set! tempdir #f))))) @@ -140,11 +142,9 @@ (run* (chroot ,root-dir mount /proc)) ;; Don't run daemons in the chroot upon apt-get install (install-file root-dir "assets/chroot-helpers/policy-rc.d" - "/usr/sbin/policy-rc.d" "root" "root" #o755) - (setenv "DEBIAN_FRONTEND" "noninteractive")) + "/usr/sbin/policy-rc.d" "root" "root" #o755)) (lambda () (thunk)) (lambda () - (unsetenv "DEBIAN_FRONTEND") (delete-file* (make-pathname root-dir "/usr/sbin/policy-rc.d")) (run* (chroot ,root-dir umount /proc))))) -- cgit v1.2.3