From 619d1704ae04e1baa37b50744c3c778cc1978b5b Mon Sep 17 00:00:00 2001 From: Daniel Stenberg Date: Sun, 5 Jan 2014 23:53:26 +0100 Subject: mk-ca-bundle.pl: avoid warnings with -d without parameter --- lib/mk-ca-bundle.pl | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lib/mk-ca-bundle.pl b/lib/mk-ca-bundle.pl index 452008568..4b78ff187 100755 --- a/lib/mk-ca-bundle.pl +++ b/lib/mk-ca-bundle.pl @@ -64,6 +64,11 @@ $0 =~ s@.*(/|\\)@@; $Getopt::Std::STANDARD_HELP_VERSION = 1; getopts('bd:fhilnqtuvw:'); +if(!defined($opt_d)) { + # to make plain "-d" use not cause warnings, and actually still work + $opt_d = 'release'; +} + # Use predefined URL or else custom URL specified on command line. my $url = ( defined( $urls{$opt_d} ) ) ? $urls{$opt_d} : $opt_d; -- cgit v1.2.3