From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 24 Mar 2021 02:07:36 +0000 (+0000)
Subject: media-scraper: Tolerate * at the end of "licences" entries
X-Git-Tag: otter-0.5.0~484
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=40dd882c324e57b7db496432b8da97bae364a03b;p=otter.git

media-scraper: Tolerate * at the end of "licences" entries

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/media-scraper b/media-scraper
index c5844388..ab6d39d8 100755
--- a/media-scraper
+++ b/media-scraper
@@ -118,6 +118,7 @@ sub method_wikimedia ($$$) {
     open WT, "$wt" or die $!;
     my (@lics) = @{ $scraper->('licences') };
     s/\W/\\$&/g foreach @lics;
+    s/\\\*$/.*/g foreach @lics;
     my $lic1_re = '(?:'.(join '|', @lics).')';
     my $ok;
     while (<WT>) {