From c764331dd9ff198383496e92bbeecab9238e2097 Mon Sep 17 00:00:00 2001
From: Gunter Knauf <gk@gknw.de>
Date: Fri, 8 Feb 2008 02:38:12 +0000
Subject: use argument to specify output filename if present.

---
 lib/mk-ca-bundle.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib')

diff --git a/lib/mk-ca-bundle.pl b/lib/mk-ca-bundle.pl
index bbfe32c0c..9357e3c3d 100755
--- a/lib/mk-ca-bundle.pl
+++ b/lib/mk-ca-bundle.pl
@@ -36,8 +36,6 @@ use MIME::Base64;
 use LWP::UserAgent;
 
 my $url = 'http://lxr.mozilla.org/seamonkey/source/security/nss/lib/ckfw/builtins/certdata.txt?raw=1';
-my $crt = 'ca-bundle.crt';
-my $tmp = 'mytmpfile.txt';
 # If the OpenSSL commandline is not in search path you can configure it here!
 my $openssl = 'openssl';
 
@@ -45,7 +43,7 @@ getopts('hilnuv');
 
 if ($opt_h) {
   $0 =~ s/\\/\//g;
-  printf("Usage:\t%s [-i] [-l] [-n] [-u] [-v]\n", substr($0, rindex($0, '/') + 1));
+  printf("Usage:\t%s [-i] [-l] [-n] [-u] [-v] [<outputfile>]\n", substr($0, rindex($0, '/') + 1));
   print "\t-i\tprint version info about used modules\n";
   print "\t-l\tprint license info about certdata.txt\n";
   print "\t-n\tno download of certdata.txt (to use existing)\n";
@@ -62,6 +60,8 @@ if ($opt_i) {
   print ("=" x 78 . "\n");
 }
 
+my $crt = $ARGV[0] || 'ca-bundle.crt';
+my $tmp = 'mytmpfile.txt';
 my $txt = substr($url, rindex($url, '/') + 1);
 $txt =~ s/\?.*//;
 if (!$opt_n) {
-- 
cgit v1.2.3