From 83586aa98e555e81870c7dff6fc7fd6ce94f4472 Mon Sep 17 00:00:00 2001
From: Olivier Thauvin <nanardon@mandriva.org>
Date: Tue, 3 Jul 2007 14:18:55 +0000
Subject: - test arch and platform in history

---
 t/01history.t | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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");
 }
-- 
cgit v1.2.1