Adapted for new config tool.

[ott/bsta] / bsta_lib.1.pm

diff --git a/bsta_lib.1.pm b/bsta_lib.1.pm
index 1105a4bc6f8230dee4f0b3e8bbeb1e8134a18a35..741634ff027501c337932f281d50c399363a53d8 100644 (file)
--- a/bsta_lib.1.pm
+++ b/bsta_lib.1.pm
@@ -1,22 +1,21 @@
 # bsta_lib.pm is generated from bsta_lib.1.pm
-# 22.09.2022
 # 
 # Library of functions
 #
-#    Copyright (C) 2016-2017, 2019-2020, 2022  Balthasar Szczepański
+# Copyright (C) 2016, 2017, 2019, 2020, 2022, 2023  Balthasar Szczepański
 #
-#    This program is free software: you can redistribute it and/or modify
-#    it under the terms of the GNU Affero General Public License as
-#    published by the Free Software Foundation, either version 3 of the
-#    License, or (at your option) any later version.
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as
+# published by the Free Software Foundation, either version 3 of the
+# License, or (at your option) any later version.
 #
-#    This program is distributed in the hope that it will be useful,
-#    but WITHOUT ANY WARRANTY; without even the implied warranty of
-#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#    GNU Affero General Public License for more details.
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
 #
-#    You should have received a copy of the GNU Affero General Public License
-#    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+# You should have received a copy of the GNU Affero General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
 package bsta_lib;
 
@@ -343,11 +342,11 @@ use constant tagsht => {
        '/?'     => '[/unknown!]',
 };
 
-$VERSION     = 0.000002;
-@ISA         = qw(Exporter);
-@EXPORT      = ();
-@EXPORT_OK   = qw(entityencode failpage gethttpheader getcgi urldecode readdatafile writedatafile printdatafile printdatafileht urlencode linehtml bb2ht bb2bb);
-%EXPORT_TAGS = ();
+###PERL_EXPORT_VERSION: our $VERSION = 'x.x.x';
+our @ISA         = qw(Exporter);
+our @EXPORT      = ();
+our @EXPORT_OK   = qw(entityencode failpage gethttpheader getcgi urldecode readdatafile writedatafile printdatafile printdatafileht urlencode linehtml bb2ht bb2bb);
+our %EXPORT_TAGS = ();
 
 # Function to show an error page
 # arguments: 1 - header fields, 2 - page title, 3 - error message, 4 method