make the option "--version" optional

parrot · Jan 14, 2011 · 0297b0a · 0297b0a
1 parent e0df021
commit 0297b0a
Showing 1 changed file with 3 additions and 5 deletions.
diff --git a/tools/docs/make_html_docs.pl b/tools/docs/make_html_docs.pl
@@ -7,7 +7,7 @@ =head1 NAME
 
 =head1 SYNOPSIS
 
-    % perl tools/docs/make_html_docs.pl --version
+    % perl tools/docs/make_html_docs.pl [--version=VERSION]
 
 =head1 DESCRIPTION
 
@@ -33,11 +33,9 @@ =head1 DESCRIPTION
 use Parrot::Docs::PodToHtml;
 use Parrot::Docs::HTMLPage;
 
-my ( $version );
+my $version='';
 
-die unless GetOptions( 'version=s' => \$version );
-
-die "Usage: $0 --version\n" unless $version;
+GetOptions( 'version=s' => \$version );
 
 my $target_dir   = 'docs/html';
 my $resource_dir = '../resources';