Changeset 13279 in josm for trunk/geticons.pl
- Timestamp:
- 2018-01-04T21:02:34+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/geticons.pl
r13277 r13279 169 169 if($haveicons{"$1.png"}) 170 170 { 171 print STDERR " File $1exists twice as .svg and .png.\n";171 print STDERR "$1: File exists twice as .svg and .png.\n"; 172 172 } 173 173 # check for unwanted svg effects … … 181 181 for my $x (split(/\s*;\s*/, $1)) 182 182 { 183 print STDERR " Style starts with minus for $ifile: $x\n" if $x =~ /^-/;183 print STDERR "$ifile: Style starts with minus: $x\n" if $x =~ /^-/; 184 184 } 185 185 } … … 187 187 { 188 188 my $x = $1; 189 print STDERR " ViewBox has float values for $ifile: $x\n" if $x =~ /\./;189 print STDERR "$ifile: ViewBox has float values: $x\n" if $x =~ /\./; 190 190 } 191 191 } 192 192 else 193 193 { 194 print STDERR " Could not open file $ifile: $1";194 print STDERR "$ifile: Could not open file: $1"; 195 195 } 196 196 } … … 203 203 if($img =~ /\.(png|svg)/) 204 204 { 205 print STDERR " File $imgdoes not exist!\n" if(!-f "images/$img");205 print STDERR "$img: File does not exist!\n" if(!-f "images/$img"); 206 206 delete $haveicons{$img}; 207 207 } 208 208 else 209 209 { 210 print STDERR " File $img(.svg|.png)does not exist!\n" if(!-f "images/$img.png" && !-f "images/$img.svg");210 print STDERR "$img(.svg|.png): File does not exist!\n" if(!-f "images/$img.png" && !-f "images/$img.svg"); 211 211 delete $haveicons{"$img.svg"}; 212 212 delete $haveicons{"$img.png"}; … … 216 216 for my $img (sort keys %haveicons) 217 217 { 218 print "$img \n";219 } 218 print "$img: Unused image.\n"; 219 }
Note:
See TracChangeset
for help on using the changeset viewer.