From bbb67b72977d0c04cec6108ebac0b21315cfe720 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 20 Jun 2007 10:24:32 +0000 Subject: fix MD5SUM generation --- genhdlist2 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'genhdlist2') diff --git a/genhdlist2 b/genhdlist2 index 27a4886..f80e1ee 100644 --- a/genhdlist2 +++ b/genhdlist2 @@ -78,7 +78,7 @@ sub do_it { rename "$hdlist.tmp", $hdlist or die "rename $hdlist failed: $?\n"; print "replacing $synthesis with $synthesis.tmp\n" if $verbose >= 0; rename "$synthesis.tmp", $synthesis or die "ERROR: this should not happen: rename $synthesis failed\n"; - generate_md5sum($media_info_dir, $hdlist, $synthesis) if !$options{no_md5sum}; + generate_md5sum($media_info_dir) if !$options{no_md5sum}; } } @@ -194,9 +194,9 @@ sub build_synthesis { } sub generate_md5sum { - my ($media_info_dir, $hdlist, $synthesis) = @_; + my ($media_info_dir) = @_; print "updating $media_info_dir/MD5SUM\n" if $verbose >= 0; - my $m = `/usr/bin/md5sum '$hdlist' '$synthesis'`; + my $m = `cd '$media_info_dir' ; /usr/bin/md5sum hdlist.cz synthesis.hdlist.cz`; open my $f, '>', "$media_info_dir/MD5SUM" or die "Can't write MD5SUM: $!\n"; print $f $m; } -- cgit v1.2.1