diag output

git-svn-id: svn+ssh://llin/home/dpavlin/private/svn/fuse/perl-llin@22 6e4b0b00-1209-0410-87b2-b275959b5705

diff --git a/test/s/mount.t b/test/s/mount.t
index b24d449..3f1052e 100644 (file)
--- a/test/s/mount.t
+++ b/test/s/mount.t
@@ -12,6 +12,7 @@ if(!fork()) {
        mkdir $_point;
        mkdir $_real;
        `echo $$ >test/s/mounted.pid`;
+       diag "mouting $_loop to $_point";
        exec("perl -Iblib/lib -Iblib/arch $_loop $_point");
        exit(1);
 }