|
From: Bob T. <bt...@us...> - 2001-07-14 21:29:23
|
Update of /cvsroot/benson/benson2/src/modules/Server/lib/Benson/Constants In directory usw-pr-cvs1:/tmp/cvs-serv22101/src/modules/Server/lib/Benson/Constants Added Files: ErrorMesgs.pm Log Message: Getting ready to fix some bugs --- NEW FILE: ErrorMesgs.pm --- package Benson::Constants::ErrorMesgs; require Exporter; @ISA = qw(Exporter); use constant BEN000 => "BEN-000 Success"; use constant BEN001 => "BEN-001 "; use constant BEN002 => "BEN-002 "; use constant BEN010 => "BEN-010 Permission Denied by Access Control Lists on gateway."; use constant BEN011 => "BEN-011 Permission Denied by Operating System."; use constant BEN100 => "BEN-100 Monitor Subsystem process has failed unexpectedly."; use constant BEN200 => "BEN-200 Communication Subsystem process has failed unexpectedly." @EXPORT = qw(BEN000 BEN001 BEN002 BEN010 BEN011 BEN100 BEN200); 1; __END__ =head1 NAME Benson::Constants::ErrorMesgs - Benson Error Message Constants =head1 DESCRIPTION These are mostly handler return constants. They currently are as follows: =head1 SEE ALSO perl(1) Benson::Handlers Benson Perl Architecture notes at C<http://benson.sourceforge.net/> =head1 AUTHORS Benson Constants written by: Bob Tribit <bt...@ne...> |