From fc6d62df1761f3ca670b26e64598e15e514f8b5d Mon Sep 17 00:00:00 2001 From: Olivier Thauvin Date: Thu, 19 Jul 2007 01:14:10 +0000 Subject: - check md5 presence --- lib/MDV/Distribconf/Checks.pm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/lib/MDV/Distribconf/Checks.pm b/lib/MDV/Distribconf/Checks.pm index 7866d32..f5c0376 100644 --- a/lib/MDV/Distribconf/Checks.pm +++ b/lib/MDV/Distribconf/Checks.pm @@ -202,7 +202,14 @@ sub check_media_coherency { $distrib->getpath($media, 'path'), $media ); - foreach (qw/hdlist synthesis/) { + foreach (qw/hdlist synthesis MD5SUM/) { + -f $distrib->getfullmediapath($media, $_) or $error += _report_err( + $fhout, + 'MISSING_INDEX', "$_ %s doesn't exist for media `%s'", + $distrib->getmediapath($media, $_), + $media + ); + /^MD5SUM$/ and next; -f $distrib->getfullpath($media, $_) or $error += _report_err( $fhout, 'MISSING_INDEX', "$_ %s doesn't exist for media `%s'", -- cgit v1.2.1