CVS_ID

diff --git a/CV.html.pl b/CV.html.pl
index 69a22c8..8c8d94e 100755 (executable)
--- a/CV.html.pl
+++ b/CV.html.pl
@@ -18,11 +18,10 @@
 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
 
-package Index;
+package CV;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/Redirect.pl b/Redirect.pl
index 6b51f62..327ef14 100755 (executable)
--- a/Redirect.pl
+++ b/Redirect.pl
@@ -20,9 +20,8 @@
 
 package Redirect;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/SendMsg.pl b/SendMsg.pl
index c480be3..08ab08e 100755 (executable)
--- a/SendMsg.pl
+++ b/SendMsg.pl
@@ -20,9 +20,8 @@
 
 package SendMsg;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/WebConfig.pm b/WebConfig.pm
index 71f3a51..e13794c 100644 (file)
--- a/WebConfig.pm
+++ b/WebConfig.pm
@@ -20,8 +20,9 @@
 
 package WebConfig;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION);
+use vars qw($VERSION $CVS_ID);
 $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+$CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/autogen.pl b/autogen.pl
index 7f0bc73..365c861 100755 (executable)
--- a/autogen.pl
+++ b/autogen.pl
@@ -19,8 +19,7 @@
 
 
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
 use strict;
 use warnings;
 

diff --git a/have_js.js.pl b/have_js.js.pl
index 3ae375d..efc19d4 100755 (executable)
--- a/have_js.js.pl
+++ b/have_js.js.pl
@@ -18,11 +18,10 @@
 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
 
-package Index;
+package have_js;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/project/ChangeLog.txt.pl b/project/ChangeLog.txt.pl
index 6bbfb41..86cb9b6 100755 (executable)
--- a/project/ChangeLog.txt.pl
+++ b/project/ChangeLog.txt.pl
@@ -20,9 +20,8 @@
 
 package project::ChangeLog;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/project/captive/Preview.html.pl b/project/captive/Preview.html.pl
index a0856b6..6eb2b27 100755 (executable)
--- a/project/captive/Preview.html.pl
+++ b/project/captive/Preview.html.pl
@@ -20,9 +20,8 @@
 
 package project::captive::Preview;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/project/captive/Resources.html.pl b/project/captive/Resources.html.pl
index 51fb5cb..c24ec8b 100755 (executable)
--- a/project/captive/Resources.html.pl
+++ b/project/captive/Resources.html.pl
@@ -20,9 +20,8 @@
 
 package project::captive::Resources;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/project/captive/Thanks.html.pl b/project/captive/Thanks.html.pl
index f4319ea..41a8b73 100755 (executable)
--- a/project/captive/Thanks.html.pl
+++ b/project/captive/Thanks.html.pl
@@ -20,9 +20,8 @@
 
 package project::captive::Thanks;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/project/captive/doc/Index.html.pl b/project/captive/doc/Index.html.pl
index 6bb3b89..95bca2d 100755 (executable)
--- a/project/captive/doc/Index.html.pl
+++ b/project/captive/doc/Index.html.pl
@@ -20,9 +20,8 @@
 
 package project::captive::doc::Index;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;
 

diff --git a/project/checkListItem.pl b/project/checkListItem.pl
index b8c9814..ed4e15f 100755 (executable)
--- a/project/checkListItem.pl
+++ b/project/checkListItem.pl
@@ -18,10 +18,10 @@
 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
 
+package project::checkListItem;
 require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;