#3 renaming aranger causes problems

[Luis M]

Renaming aranger from aranger.pl to anything else
causes --help to break. This patch fixes that:

--- aranger-bak.pl 2004-10-10 09:03:05 -0400
+++ aranger-new.pl 2004-10-10 09:11:45 -0400
@@ -2453,7 +2453,7 @@
# usage
sub usage {
my $parser = Pod::Text->new (sentence => 0, width =>
78);
- $parser->parse_from_file(File::Spec->catfile($Bin ,
'aranger.pl'),
+ $parser->parse_from_file(File::Spec->catfile("$0"),
\*STDOUT);
}