1
0
mirror of synced 2026-03-06 18:51:14 +00:00

Make t/xen-lists-images.t more strict: No more /i

This commit is contained in:
Axel Beckert
2013-01-17 22:17:37 +01:00
parent dc5b36f8ef
commit 3456849ec8

View File

@@ -109,22 +109,22 @@ EOS
my $success = 0;
foreach my $line ( split( /\n/, $output ) )
{
if ( $line =~ /Memory: ([0-9]+)/i )
if ( $line =~ /Memory: ([0-9]+)/ )
{
is( $1, $memory, "We found the right amount of memory: $memory" );
$success += 1;
}
if ( $line =~ /Name: (.*)/i )
if ( $line =~ /Name: (.*)/ )
{
is( $1, $name, "We found the correct hostname: $name" );
$success += 1;
}
if ( $line =~ /DHCP/i )
if ( $line =~ /DHCP/ )
{
is( $dhcp, 1, "Found the right DHCP details" );
$success += 1;
}
if ( $line =~ /IP: ([0-9.]+)/i )
if ( $line =~ /IP: ([0-9.]+)/ )
{
is( $1, $ip, "We found the IP address: $ip" );
is( $dhcp, 0, "And DHCP is disabled" );