Bug 18736: (follow-up) Fix missing rounding and bad formatting
[koha.git] / C4 / Debug.pm
index dad8873..5665618 100644 (file)
@@ -4,30 +4,29 @@ package C4::Debug;
 #
 # This file is part of Koha.
 #
-# Koha is free software; you can redistribute it and/or modify it under the
-# terms of the GNU General Public License as published by the Free Software
-# Foundation; either version 2 of the License, or (at your option) any later
-# version.
+# Koha is free software; you can redistribute it and/or modify it
+# under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
 #
-# Koha 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 General Public License for more details.
+# Koha 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 General Public License for more details.
 #
-# You should have received a copy of the GNU General Public License along
-# with Koha; if not, write to the Free Software Foundation, Inc.,
-# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+# You should have received a copy of the GNU General Public License
+# along with Koha; if not, see <http://www.gnu.org/licenses>.
 
 use strict;
 use warnings;
 
 use Exporter;
 
-# use CGI;
-use vars qw($VERSION @ISA @EXPORT $debug $cgi_debug);
+# use CGI qw ( -utf8 );
+use vars qw(@ISA @EXPORT $debug $cgi_debug);
 # use vars qw(@EXPORT_OK %EXPORT_TAGS);
 
 BEGIN {
-       $VERSION = 1.00;        # set the version for version checking
        @ISA       = qw(Exporter);
        @EXPORT    = qw($debug $cgi_debug);
        # @EXPOR_OK    = qw();
@@ -74,8 +73,8 @@ BEGIN {
 __END__
 
 =head1 NAME 
-       
-       C4::Debug - Standardized, centralized, exported debug switches.
+
+C4::Debug - Standardized, centralized, exported debug switches.
 
 =head1 SYNOPSIS
 
@@ -116,7 +115,7 @@ The general purpose debug switch.
 =over
 
 =item environmental variable DEBUG or KOHA_DEBUG.  In bash, you might do:
-       
+
        export KOHA_DEBUG=1;
        perl t/Auth.t;
 
@@ -127,7 +126,6 @@ command with ERROR_LOG enabled for your VirtualHost.  Not intended for productio
 =item You can force the value from perl directly, like:
 
        use C4::Debug;
-       use C4::Dates;
        BEGIN { $C4::Debug::debug = 1; }
        # now any other dependencies that also use C4::Debug will have debugging ON.
 
@@ -159,6 +157,8 @@ emailing yourself a test message would all be bad actions to tie to $cgi_debug.
 
 =head2 System Preferences
 
+=cut
+
 =head2 Database Debug
 
 Debugging at the database level might be useful.  Koha does not currently integrate any such