patch from Chris Dolan via rt.cpan.org #30631

[perl-fuse.git] / test / s / umount.t

diff --git a/test/s/umount.t b/test/s/umount.t
index 28757e2..c77301a 100644 (file)
--- a/test/s/umount.t
+++ b/test/s/umount.t
@@ -4,6 +4,9 @@ use strict;
 use Test::More tests => 1;
 use POSIX qw(WEXITSTATUS);
 system("fusermount -u $_point");
+if(POSIX::WEXITSTATUS($?) != 0) {
+       system("umount $_point");
+}
 ok(POSIX::WEXITSTATUS($?) == 0,"unmount");
 system("rm -rf $_real $_pidfile");
 rmdir($_point);