# This file is part of "KarmaLab.net Perl Library".
#    Copyright 2005, Yoran Brault
#    eMail: yoran.brault@bad_karma-lab.net (remove "bad_" before sending)
#    Site : http://artisan.karma-lab.net
#
# "KarmaLab.net Perl Library" is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public License as
# published by the Free Software Foundation; either version 2.1 of
# the License, or (at your option) any later version.
#
# "KarmaLab.net Perl Library" 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
# Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with "KarmaLab.net Perl Library"; if not, write to the Free
# Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
# 02110-1301 USA, or see the FSF site: http://www.fsf.org.

package Logging::Level;
require 5.6.0;

use strict;
use warnings;
 
use constant LEVEL_PROGRESS => 1;
use constant LEVEL_TRACE=> 2;
use constant LEVEL_INFO => 4;
use constant LEVEL_SEVERE => 8;
use constant LEVEL_WARNING => 16;
use constant LEVEL_DEBUG => 32;
use constant LEVEL_ALL => LEVEL_DEBUG+LEVEL_INFO+LEVEL_WARNING+LEVEL_SEVERE+LEVEL_PROGRESS+LEVEL_TRACE;
 
our(@ISA, @EXPORT);
 
@ISA    = qw(Exporter);
@EXPORT = qw(LEVEL_DEBUG LEVEL_INFO LEVEL_WARNING LEVEL_PROGRESS LEVEL_SEVERE LEVEL_ALL LEVEL_TRACE);

1;
