tags 666588 + pending thanks Dear maintainer,
I've prepared an NMU for gauche (versioned as 0.9.1-5.1) and have it uploaded soon. Cheers Luk
diff -Nru gauche-0.9.1/debian/changelog gauche-0.9.1/debian/changelog --- gauche-0.9.1/debian/changelog 2011-03-08 08:15:17.000000000 +0100 +++ gauche-0.9.1/debian/changelog 2012-07-05 20:25:53.000000000 +0200 @@ -1,3 +1,10 @@ +gauche (0.9.1-5.1) unstable; urgency=low + + * Non-maintainer upload. + * Avoid using $HOME (Closes: #666588). + + -- Luk Claes <l...@debian.org> Thu, 05 Jul 2012 18:24:46 +0000 + gauche (0.9.1-5) unstable; urgency=low * debian/patches/19_nettest_skip.patch: More fix. diff -Nru gauche-0.9.1/debian/patches/29_avoid_using_/root.patch gauche-0.9.1/debian/patches/29_avoid_using_/root.patch --- gauche-0.9.1/debian/patches/29_avoid_using_/root.patch 1970-01-01 01:00:00.000000000 +0100 +++ gauche-0.9.1/debian/patches/29_avoid_using_/root.patch 2012-07-05 20:24:40.000000000 +0200 @@ -0,0 +1,13 @@ +Index: gauche-0.9.1/test/system.scm +=================================================================== +--- gauche-0.9.1.orig/test/system.scm 2010-02-20 09:43:44.000000000 +0000 ++++ gauche-0.9.1/test/system.scm 2012-07-05 18:24:36.000000000 +0000 +@@ -142,7 +142,7 @@ + (gauche.os.windows #t) + (else + (test* "normalize" +- (n (string-append (get-command-output "echo $HOME") "/abc")) ++ (n (string-append (slot-ref (sys-get-pwuid (sys-getuid)) 'dir) "/abc")) + (sys-normalize-pathname "~/abc" :expand #t)))) + + (test* "normalize" (n "/a/b/c/d/e") diff -Nru gauche-0.9.1/debian/patches/series gauche-0.9.1/debian/patches/series --- gauche-0.9.1/debian/patches/series 2011-03-08 05:29:16.000000000 +0100 +++ gauche-0.9.1/debian/patches/series 2012-07-05 20:23:21.000000000 +0200 @@ -16,3 +16,4 @@ 26_no_microversion_in_soname.patch 27_libgc_fix__data_start.patch 28_test_under_pty.patch +29_avoid_using_/root.patch