From b6fd026b754a0898a4d244a7a33afc2d610109ab Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 9 Nov 2007 15:32:15 +0000 Subject: never create broken symlinks for "alternate location" of hdlist/synthesis/pubkey --- gendistrib | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'gendistrib') diff --git a/gendistrib b/gendistrib index 3975063..b31547c 100755 --- a/gendistrib +++ b/gendistrib @@ -159,7 +159,7 @@ foreach my $e (@hdlists) { hdlist_alternate_location($e->{hdlist2}, $e->{hdlist}); hdlist_alternate_location($e->{synthesis2}, $e->{synthesis}); $e->{pubkey2} =~ s/ /_/g; # workaround MDV::Distribconf issue - hdlist_alternate_location($e->{pubkey2}, $e->{pubkey}) if -e $e->{pubkey}; + hdlist_alternate_location($e->{pubkey2}, $e->{pubkey}); } if (grep { ! $_->{noneedrebuild} } @hdlists) { @@ -214,7 +214,9 @@ if (grep { ! ($_->{noneedrebuild} && $_->{noneedredomd5}) } @hdlists) { sub hdlist_alternate_location { my ($alternate, $main) = @_; - if (-l $alternate && inode($alternate) == inode($main)) { + if (! -e $main) { + print STDERR "missing $main, not creating alternate location $alternate\n"; + } elsif (-l $alternate && inode($alternate) == inode($main)) { # ok } else { if (-l $alternate) { -- cgit v1.2.1