add apache log style aliases

This commit is contained in:
Isaac Connor 2017-10-27 09:05:07 -07:00
parent ec3b18f8e8
commit 230daa74da
1 changed files with 12 additions and 0 deletions

View File

@ -678,6 +678,8 @@ sub Dump {
fetch()->logPrint( DEBUG, Data::Dumper->Dump( [ $var ], [ $label ] ) ); fetch()->logPrint( DEBUG, Data::Dumper->Dump( [ $var ], [ $label ] ) );
} }
sub debug { fetch()->logPrint( DEBUG, @_ ); }
sub Debug( @ ) { sub Debug( @ ) {
fetch()->logPrint( DEBUG, @_ ); fetch()->logPrint( DEBUG, @_ );
} }
@ -685,14 +687,24 @@ sub Debug( @ ) {
sub Info( @ ) { sub Info( @ ) {
fetch()->logPrint( INFO, @_ ); fetch()->logPrint( INFO, @_ );
} }
sub info {
fetch()->logPrint( INFO, @_ );
}
sub Warning( @ ) { sub Warning( @ ) {
fetch()->logPrint( WARNING, @_ ); fetch()->logPrint( WARNING, @_ );
} }
sub warn {
fetch()->logPrint( WARNING, @_ );
}
sub Error( @ ) { sub Error( @ ) {
fetch()->logPrint( ERROR, @_ ); fetch()->logPrint( ERROR, @_ );
} }
sub error {
fetch()->logPrint( ERROR, @_ );
}
sub Fatal( @ ) { sub Fatal( @ ) {
fetch()->logPrint( FATAL, @_ ); fetch()->logPrint( FATAL, @_ );