File Coverage

blib/lib/Gantry/Utils/Model/Auth.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Gantry::Utils::Model::Auth;
2 4     4   34 use strict; use warnings;
  4     4   8  
  4         131  
  4         19  
  4         8  
  4         97  
3              
4 4     4   18 use base 'Gantry::Utils::Model';
  4         9  
  4         2755  
5              
6 4         37 use Gantry::Utils::ModelHelper qw(
7             auth_db_Main
8             get_form_selections
9             retrieve_all_for_main_listing
10 4     4   2135 );
  4         11  
11              
12             1;
13              
14             =head1 NAME
15              
16             Gantry::Utils::Model::Auth - base class for auth database modelers
17              
18             =head1 SYNOPSIS
19              
20             package Your::App::Name::Model::table_name;
21              
22             use base 'Gantry::Utils::Model::Auth';
23              
24             =head1 DESCRIPTION
25              
26             Use this as the parent class of your individual model module when
27             that model needs to use the auth database connection. Follow
28             the instructions in Gantry::Utils::Model for what your subclass must
29             implement (and it is a lot, we usually generate the module with Bigtop).
30              
31             =head1 AUTHOR
32              
33             Phil Crow
34              
35             =head1 COPYRIGHT and LICENSE
36              
37             Copyright (c) 2006, Phil Crow
38              
39             This library is free software; you can redistribute it and/or modify
40             it under the same terms as Perl itself, either Perl version 5.8.6 or,
41             at your option, any later version of Perl 5 you may have available.
42              
43             =cut