fixes for Andrew for dh-make-perl which uses fakeroot

[perl-fuse.git] / test / mknod.t

diff --git a/test/mknod.t b/test/mknod.t
index 1dd948f..2d10c61 100644 (file)
--- a/test/mknod.t
+++ b/test/mknod.t
@@ -26,6 +26,10 @@ SKIP: {
        chdir($_real);
        ok(-e "chr" ,"chrdev exists");
        ok(-e "blk" ,"blkdev exists");
+        
+        skip('mknod() is just pretend under fakeroot(1)', 4)
+          if exists $ENV{FAKEROOTKEY};
+
        ok(-c "chr" ,"chrdev is chrdev");
        ok(-b "blk" ,"blkdev is blkdev");