Changeset 10566 in josm for trunk/geticons.pl

Timestamp:

2016-07-19T20:53:22+02:00 (8 years ago)

Author:

stoecker

Message:

see #13084 - fix some errors in icon move

File:

• trunk/geticons.pl (modified) (2 diffs)

trunk/geticons.pl

@@ -37 +37 @@
       if(($l =~ /(?:icon-image|repeat-image|fill-image)\s*:\s*(\"?(.*?)\"?)\s*;/) && ($1 ne "none"))
       {
-        my $val = $2;
-        my $img = "styles/standard/$val";
-        $img = "styles/$val" if((!-f "images/$img") && -f "images/styles/$val");
-        $img = $val if((!-f "images/$img") && -f "images/$val");
+        my $img = $2;
         ++$icons{$img};
       }
@@ -46 +43 @@
       {
         my $i = $1;
-        $i = "styles/standard/$i" if $i eq "misc/no_icon";
         ++$icons{$i};
       }