Another small output fix for --help and --version.

diff --git a/lib/mk-ca-bundle.pl b/lib/mk-ca-bundle.pl
index b7ab1a1bf07a8dae4b0c2f25c2e9bacaef43194d..2eeefff0bb52d13a197ffe62d0373cbdd9c2d6a7 100755 (executable)
--- a/lib/mk-ca-bundle.pl
+++ b/lib/mk-ca-bundle.pl
@@ -44,6 +44,7 @@ my $version = '1.18';
 
 $opt_w = 76; # default base64 encoded lines length
 
+$0 =~ s@.*(/|\\)@@;
 $Getopt::Std::STANDARD_HELP_VERSION = 1;
 getopts('bfhilnqtuvw:');
 
@@ -59,7 +60,6 @@ if ($opt_i) {
   print ("=" x 78 . "\n");
 }
 
-$0 =~ s@.*(/|\\)@@;
 sub HELP_MESSAGE() {
   print "Usage:\t${0} [-b] [-f] [-i] [-l] [-n] [-q] [-t] [-u] [-v] [-w<l>] [<outputfile>]\n";
   print "\t-b\tbackup an existing version of ca-bundle.crt\n";