X-Git-Url: http://git.projectaon.org/?p=project-aon.git;a=blobdiff_plain;f=common%2Fscripts%2Ffix-image-sizes.pl;h=1e90687cca858cafd5dfe77623bce9b3cfb32156;hp=dc8f55f3bae80b68f36e0c77f590d36c9e6acb04;hb=e84b8099c8855cbdf8c42f5bb9b4175fe265f57f;hpb=d2413388740c5666d4976a0c7b29a5f694ca73d1

diff --git a/common/scripts/fix-image-sizes.pl b/common/scripts/fix-image-sizes.pl
index dc8f55f..1e90687 100755
--- a/common/scripts/fix-image-sizes.pl
+++ b/common/scripts/fix-image-sizes.pl
@@ -5,7 +5,8 @@ use strict;
 use File::Spec;
 use Image::Size;
 
-my $USAGE = "typical usage:\timage-size.pl *.png <input.xml >output.xml\n";
+my $PROG_NAME = 'fix-image-sizes.pl';
+my $USAGE = "typical usage:\t${PROG_NAME} *.png <input.xml >output.xml\n";
 die $USAGE if $#ARGV < 0;
 
 my %image_widths = ( );