Description: skip expansion tests if the home directory reported by getpwuid
 doesn't exist, as it happens in sbuild chroots with default configuration
Origin: vendor
Bug-Debian: http://bugs.debian.org/615963
Forwarded: yes
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2011-03-06

--- a/t/01basic.t
+++ b/t/01basic.t
@@ -31,6 +31,8 @@
 
     my $expanded = (getpwuid($<))[7] . '/';
 
+    skip 'home directory reported by getpwuid does not exist', 1 unless -d $expanded;
+
     shift @INC if $INC[0] eq '/etc/perl';
 
     is $INC[0], $expanded, 'bare tilde expansion';
@@ -54,6 +56,8 @@
 
     my $expanded = (getpwuid($<))[7] . '/';
 
+    skip 'home directory reported by getpwuid does not exist', 1 unless -d $expanded;
+
     shift @INC if $INC[0] eq '/etc/perl';
 
     is $INC[0], $expanded, 'tilde expansion with user name';