diff options
| author | Yousuf Philips <philipz85@hotmail.com> | 2015-10-13 14:58:05 +0400 |
|---|---|---|
| committer | Samuel Mehrbrodt <Samuel.Mehrbrodt@cib.de> | 2015-10-14 12:35:30 +0000 |
| commit | 96983b2a2cad767cb3bfd77ce60acfe31402dd9c (patch) | |
| tree | 00f0a2882fa6d399fc4a3eb696762cf64e94138f /solenv/bin/packimages.pl | |
| parent | f10d88b436383beebf5cbc7387fa23f6e7d8f919 (diff) | |
Output all links.txt icons pointing to other icons in one go
Change-Id: I9fa031c84157d573a63c9e31458ba578618e1596
Reviewed-on: https://gerrit.libreoffice.org/19350
Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Samuel Mehrbrodt <Samuel.Mehrbrodt@cib.de>
Diffstat (limited to 'solenv/bin/packimages.pl')
| -rw-r--r-- | solenv/bin/packimages.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/solenv/bin/packimages.pl b/solenv/bin/packimages.pl index 0e985662e398..b05b83fd25d6 100644 --- a/solenv/bin/packimages.pl +++ b/solenv/bin/packimages.pl @@ -507,13 +507,19 @@ sub write_links($) sub check_links($) { my $links = shift; + my $stop_die = 0; for my $link (keys %{$links}) { my $value = $links->{$link}; if (defined $links->{$value}) { - die "Link to another link: $link -> $value -> " . $links->{$value}; + print STDERR "\nLink: $link -> $value -> " . $links->{$value}; + $stop_die = 1; } } + if ( $stop_die ) { + die "\nSome icons in links.txt were found to link to other linked icons.\n\n"; + } + } # remove any files from our zip list that are linked |