X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=perl%2Ft%2F500-lib-load.t;h=de928aed7a412bb9befc70112b2ddbb6350fccee;hp=140716955055dd82a2e09f0423ed80ab8fdf0cd9;hb=aa999d0586fd69094cb06ccb3ae5c429649662e0;hpb=8b854734bd13b7f68b72422932de3bf24c84ca15

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