[svn:parrot] r47690 - branches/html_cleanup/tools/docs

[coke at svn.parrot.org]

Author: coke
Date: Fri Jun 18 16:46:25 2010
New Revision: 47690
URL: https://trac.parrot.org/parrot/changeset/47690

Log:
drop --silent. Require --version.

Modified:
   branches/html_cleanup/tools/docs/make_html_docs.pl

Modified: branches/html_cleanup/tools/docs/make_html_docs.pl
==============================================================================
--- branches/html_cleanup/tools/docs/make_html_docs.pl	Fri Jun 18 16:45:57 2010	(r47689)
+++ branches/html_cleanup/tools/docs/make_html_docs.pl	Fri Jun 18 16:46:25 2010	(r47690)
@@ -8,7 +8,7 @@
 
 =head1 SYNOPSIS
 
-    % perl tools/docs/make_html_docs.pl [--silent] [--version]
+    % perl tools/docs/make_html_docs.pl --version
 
 =head1 DESCRIPTION
 
@@ -24,11 +24,11 @@
 use Getopt::Long;
 use JSON;
 
-my ( $silent, $version );
+my ( $version );
 
-die unless GetOptions( 'silent'    => \$silent,
-                       'version=s' => \$version,
-                     );
+die unless GetOptions( 'version=s' => \$version );
+
+die "Usage: $0 --version\n" unless $version;
 
 my $json = JSON->new();