diff options
| -rw-r--r-- | t/01history.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/t/01history.t b/t/01history.t index 2c8b11d..ef7e47a 100644 --- a/t/01history.t +++ b/t/01history.t @@ -8,7 +8,7 @@ use MDV::Distribconf; my @testdpath = glob('testdata/history/*/*/*'); -plan tests => 3 * scalar(@testdpath); +plan tests => 5 * scalar(@testdpath); foreach my $path (@testdpath) { ok( @@ -17,4 +17,6 @@ foreach my $path (@testdpath) { ); ok($dconf->load(), "can load $path"); ok($dconf->listmedia(), "can list media"); + ok($dconf->getvalue(undef, "arch"), "can get arch"); + like($dconf->getvalue(undef, "platform"), '/^[^-]*-(mandriva|mandrake)-linux-gnu$/', "can get arch"); } |