From: Jacob Bachmeyer <jcb@gnu.org>
Date: Sat, 8 Oct 2022 03:50:36 +0000 (-0500)
Subject: Eliminate version_information sub that was called exactly once
X-Git-Url: https://vcs.fsf.org/?a=commitdiff_plain;h=d688123d38c998c431e4e2a75b6bed97f692166b;p=gatekeeper.git

Eliminate version_information sub that was called exactly once
---

diff --git a/gatekeeper.pl b/gatekeeper.pl
index 69e0081..6de257f 100755
--- a/gatekeeper.pl
+++ b/gatekeeper.pl
@@ -262,7 +262,7 @@ our $style;
 our $help;
 our $version;
 
-sub version_information {
+if ($version) {
   print "\nThis is $NAME protocol version $VERSION ($DATE)\n";
   print $COPYRIGHT_NOTICE;
   print "License: $LICENSE\n";
@@ -275,7 +275,6 @@ sub version_information {
   exit 0;
 }
 
-version_information() if ($version);
 pod2usage(-verbose => 1, -exitval => 0) if ($help);
 pod2usage(-message => 'ERROR:  Required parameter not given or invalid.',
 	  -verbose => 0, -exitval => 2)