X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=perl%2Ft%2F510-lib-file-arch.t;h=b0a96e9fe05d9f2983ac8d16c8061de2d9bd0cf5;hb=aa999d0586fd69094cb06ccb3ae5c429649662e0;hp=14392e89f73c6c482ac7523b78d748d0f710102d;hpb=1f65b900f0f17a700035dea9a76b910504f4507c;p=libguestfs.git

diff --git a/perl/t/510-lib-file-arch.t b/perl/t/510-lib-file-arch.t
index 14392e8..b0a96e9 100644
--- a/perl/t/510-lib-file-arch.t
+++ b/perl/t/510-lib-file-arch.t
@@ -17,7 +17,17 @@
 
 use strict;
 use warnings;
-use Test::More tests => 17;
+
+BEGIN {
+    use Test::More;
+    eval "use Locale::TextDomain";;
+    if (exists $INC{"Locale/TextDomain.pm"}) {
+	plan tests => 17;
+    } else {
+	plan skip_all => "no perl-libintl module";
+	exit 0;
+    }
+}
 
 use Sys::Guestfs;
 use Sys::Guestfs::Lib;