Just skip non-existent files

1 files changed, 4 insertions, 0 deletions

diff --git a/solenv/bin/image-sort.pl b/solenv/bin/image-sort.pl
index e4fd8491baf2..01f0b5e53f2d 100755
--- a/solenv/bin/image-sort.pl
+++ b/solenv/bin/image-sort.pl
@@ -9,6 +9,10 @@ sub read_icons($)
     my $fname = shift;
     my $fileh;
     my @images;
+    if (! -e "$base_path/$fname") {
+        print "Skipping non-existent $base_path/$fname\n";
+        return @images;
+    }
     open ($fileh, "$base_path/$fname") || die "Can't open $base_path/$fname: $!";
     while (<$fileh>) {
     m/xlink:href=\"\.uno:(\S+)\"\s+/ || next;