| … | … | ||
|---|---|---|---|
| 16 | s/([<>&])/sprintf "&#%d;", ord $1/ge; | 16 | s/([<>&])/sprintf "&#%d;", ord $1/ge; |
| 17 | $_ | 17 | $_ |
| 18 | } | 18 | } |
| 19 | 19 | ||
| 20 | for my $path (@ARGV) { | 20 | for my $path (@ARGV) { |
| 21 | print "$path\n"; | ||
| 22 | |||
| 21 | if (!-e "$path.png" | 23 | if (!-e "$path.png" |
| 22 | || !-e "$path.pst" | 24 | || !-e "$path.pst" |
| 23 | || -M "$path.pst" > -M $path | 25 | || -M "$path.pst" > -M $path |
| 24 | || -M "$path.png" > -M $path) { | 26 | || -M "$path.png" > -M $path) { |
| 25 | # regenerate png and metainfo | 27 | # regenerate png and metainfo |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |