t/02_settings_checksum.t: Accept hex digits
authorChristoph Berg <[email protected]>
Tue, 2 Jul 2013 13:27:58 +0000 (15:27 +0200)
committerChristoph Berg <[email protected]>
Tue, 2 Jul 2013 13:27:58 +0000 (15:27 +0200)
Previously, this check only worked by chance if the returned checksum
started with a plain digit.

t/02_settings_checksum.t

index a4df6b305f304de6c315135bde620eba20031318..21c835e4376f35184010859dfcfb82e5cf457c50 100644 (file)
@@ -54,10 +54,10 @@ like ($cp->run("-w $true_checksum"), qr/OK.*\Qchecksum: $true_checksum\E/, $t);
 
 $t=qq{$S returns the expected output for MRTG(failure)};
 like ($cp->run(q{--mrtg 123 --output=MRTG}),
-      qr{^0\n0\n\n\d+}, $t);
+      qr{^0\n0\n\n[[:xdigit:]]+$}, $t);
 
 $t=qq{$S returns the expected output for MRTG(success)};
 like ($cp->run(qq{--mrtg $true_checksum --output=MRTG}),
-      qr{^1\n0\n\n\d+}, $t);
+      qr{^1\n0\n\n[[:xdigit:]]+$}, $t);
 
 exit;