1
0
mirror of synced 2026-04-26 12:26:54 +00:00

Skip t/xen-tools.t if not running as root (tries to mkdir -p /var/log/xen-tools)

This commit is contained in:
Axel Beckert
2010-07-16 18:00:52 +02:00
parent c67d218cef
commit a04bae2be0

View File

@@ -8,7 +8,14 @@ use strict;
use warnings;
use Test::More tests => 1, skip_all => 'Xen::Tools is not used for now';
use Xen::Tools;
SKIP: {
skip "Test only works as root", 1 if $< > 0;
my $xt = Xen::Tools->new( hostname => 'xen-tools-test' );
ok( $xt->isa('Xen::Tools') );
eval {
use Xen::Tools;
my $xt = Xen::Tools->new( hostname => 'xen-tools-test' );
ok( $xt->isa('Xen::Tools') );
}
}