aboutsummaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
authorRomain d'Alverny <rda@mageia.org>2011-12-10 17:27:16 +0000
committerRomain d'Alverny <rda@mageia.org>2011-12-10 17:27:16 +0000
commit73301e163a277eae7fd8270cff2cf6277ac925a1 (patch)
tree6cf499691f3d70a2a097da1d806d86322301974c /t
parent55986d1758d7ae948c0bed1645ae49ca7103f96e (diff)
downloadisocheck-73301e163a277eae7fd8270cff2cf6277ac925a1.tar
isocheck-73301e163a277eae7fd8270cff2cf6277ac925a1.tar.gz
isocheck-73301e163a277eae7fd8270cff2cf6277ac925a1.tar.bz2
isocheck-73301e163a277eae7fd8270cff2cf6277ac925a1.tar.xz
isocheck-73301e163a277eae7fd8270cff2cf6277ac925a1.zip
remove test for now, fix typo
Diffstat (limited to 't')
-rw-r--r--t/001_check_file.t17
1 files changed, 9 insertions, 8 deletions
diff --git a/t/001_check_file.t b/t/001_check_file.t
index bd4a000..ce36df0 100644
--- a/t/001_check_file.t
+++ b/t/001_check_file.t
@@ -30,9 +30,6 @@ my %info;
bail_on_fail;
-note $image_path;
-note $name;
-
%info = Tools::parse_mageia_iso_name($name);
if (scalar %info) {
pass 'ISO has valid filename.';
@@ -96,14 +93,18 @@ my %isoValues = (
"Volume id", "$info{name} $info{version} $info{release}", # TODO not defined for sure yet
"Volume set id", "$info{name} $info{version} $info{release} $info{variant} $info{arch} $info{medium}", # TODO $info{'build'} ?
"Publisher id", "Mageia.Org",
- "Data preparer id", "?",
- "Application id", "http://code.mageia.org/bcd/",
- "Copyright file id", "http://www.mageia.org/2/license/",
- "Abstract file id", "http://www.mageia.org/2/"
+ "Data preparer id", "", # ?
+ "Copyright File id", "http://www.mageia.org/2/license/"
+ "Abstract File id", "http://www.mageia.org/2/"
);
+my $testval;
while (my ($k, $v) = each(%isoValues)) {
- is `printf "%s\n" "$info" | grep -i "$k:"`, "$k: $v", "$k is correct.";
+ $testval = `printf "%s\n" "$isoinfo" | grep -i "$k:" |tr -d '\n'`;
+
+ # not testing right now, all expected values are not sure yet.
+ # is $testval, "$k: $v", "$k is correct. Found $testval.";
+ note "Found: $testval - expecting: $k: $v";
}