Changeset 4172 in josm for trunk/geticons.pl
- Timestamp:
- 2011-06-26T13:43:35+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/geticons.pl
r3945 r4172 5 5 my @default = ( 6 6 "styles/standard/*.xml", 7 "styles/standard/*.mapcss", 7 8 "data/*.xml", 8 9 "src/org/openstreetmap/josm/*.java", … … 32 33 my $img = "styles/standard/$1"; 33 34 $img = "styles/$1" if((!-f "images/$img") && -f "images/styles/$1"); 35 $img = $1 if((!-f "images/$img") && -f "images/$1"); 34 36 ++$icons{$img}; 35 37 } 36 elsif($l =~ /icon\s* =\s*["']([^+]+?)["']/)38 elsif($l =~ /icon\s*[:=]\s*["']([^+]+?)["']/) 37 39 { 38 40 ++$icons{$1}; 39 41 } 40 42 43 if($l =~ /icon-image:\s*\"?(.*?)\"?\s*;/) 44 { 45 my $img = "styles/standard/$1"; 46 $img = "styles/$1" if((!-f "images/$img") && -f "images/styles/$1"); 47 $img = $1 if((!-f "images/$img") && -f "images/$1"); 48 ++$icons{$img}; 49 } 41 50 if($l =~ /ImageProvider\.get\(\"([^\"]*?)\"\)/) 42 51 { … … 45 54 ++$icons{$i}; 46 55 } 56 while($l =~ /\/\*\s*ICON\s*\*\/\s*\"(.*?)\"/g) 57 { 58 my $i = $1; 59 $i .= ".png" if !($i =~ /\.png$/); 60 ++$icons{$i}; 61 } 62 while($l =~ /\/\*\s*ICON\((.*?)\)\s*\*\/\s*\"(.*?)\"/g) 63 { 64 my $i = "$1$2"; 65 $i .= ".png" if !($i =~ /\.png$/); 66 ++$icons{$i}; 67 } 47 68 if($l =~ /new\s+ImageLabel\(\"(.*?)\"/) 48 69 { … … 81 102 { 82 103 my $i = "cursor/$1"; 104 $i .= ".png" if !($i =~ /\.png$/); 105 ++$icons{$i}; 106 } 107 if($l =~ /SideButton*\(\s*(?:mark)?tr\s*\(\s*\".*?\"\s*\)\s*,\s*\"(.*?)\"/) 108 { 109 my $i = "dialogs/$1"; 83 110 $i .= ".png" if !($i =~ /\.png$/); 84 111 ++$icons{$i};
Note:
See TracChangeset
for help on using the changeset viewer.