Normalise commodity name case (from uploads)

[ypp-sc-tools.db-test.git] / yarrg / CommodsScrape.pm

diff --git a/yarrg/CommodsScrape.pm b/yarrg/CommodsScrape.pm
index ccc2d98bd0ea4624fb7d977e5411b8459a414686..2cd1148f9a3f1c60a97e22cf3b0d1f60d5a84e47 100644 (file)
--- a/yarrg/CommodsScrape.pm
+++ b/yarrg/CommodsScrape.pm
@@ -62,7 +62,7 @@ sub yppedia_chart_parse ($$ $$$$ $) {
            m/^\{\{ chart\ label \|(\d+)\|(\d+)\| .*
                    (?: \<(?: big|center )\>)* \'+
                    (?: \[\[ | \{\{ )
-                   [^][\']* \| ([^][\'|]+)\ archipelago
+                   [^][]* \| ([^][|]+)\ archipelago
                    (?: \]\] | \}\} )
                    \'+ (?: \<\/(?: big|center )\>)* \}\}$/xi) {
            printf $debugfh "%2d,%-2d arch %s\n", $x,$y,$arch;