Mercurial > pub > Impl

comparison Lib/IMPL/Security/Auth.pm @ 166:4267a2ac3d46

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:12:06 +0400
parents 6d3bca490556
children d1676be8afcc
comparison
equal deleted inserted replaced
165:76515373dac0 166:4267a2ac3d46
6 AUTH_SUCCESS => 1, 6 AUTH_SUCCESS => 1,
7 AUTH_INCOMPLETE => 2, 7 AUTH_INCOMPLETE => 2,
8 AUTH_FAIL => 3 8 AUTH_FAIL => 3
9 }; 9 };
10 10
11 use base qw(Exporter); 11 use parent qw(Exporter);
12 12
13 our @EXPORT_OK = qw(&AUTH_SUCCESS &AUTH_INCOMPLETE &AUTH_FAIL &GenSSID); 13 our @EXPORT_OK = qw(&AUTH_SUCCESS &AUTH_INCOMPLETE &AUTH_FAIL &GenSSID);
14 our %EXPORT_TAGS = (Const => [qw(&AUTH_SUCCESS &AUTH_INCOMPLETE &AUTH_FAIL)]); 14 our %EXPORT_TAGS = (Const => [qw(&AUTH_SUCCESS &AUTH_INCOMPLETE &AUTH_FAIL)]);
15 15
16 { 16 {