Changeset 3368 in josm for trunk/geticons.pl


Ignore:
Timestamp:
2010-07-08T18:40:00+02:00 (9 years ago)
Author:
stoecker
Message:

fix geticons

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/geticons.pl

    r2981 r3368  
    3030      if($l =~ /src\s*=\s*["'](.*?)["']/)
    3131      {
    32         ++$icons{"styles/standard/$1"};
     32        my $a = "styles/standard/$1";
     33        $a = "styles/$1" if((!-f "images/$a") && -f "images/styles/$1");
     34        ++$icons{$a};
    3335      }
    3436      elsif($l =~ /icon\s*=\s*["'](.*?)["']/)
Note: See TracChangeset for help on using the changeset viewer.