register.pm revision 7c478bd95313f5f23a4c958a745db2134aa03244
package warnings::register ;
our $VERSION = '1.00';
=pod
=head1 NAME
warnings::register - warnings import function
=head1 SYNOPSIS
use warnings::register ;
=head1 DESCRIPTION
Create a warnings category with the same name as the current package.
See L<perlmodlib/Pragmatic Modules> and L<perllexwarn>.
=cut
require warnings ;
sub mkMask
{
my ($bit) = @_ ;
my $mask = "" ;
return $mask ;
}
sub import
{
shift ;
}
}
}
1 ;