lib/Maypole/Config.pm

   1 package Maypole::Config;
   2 use base qw(Class::Accessor);
   3 use attributes ();
   4 #use overload
   5 #    '""' => sub { shift->stringify_self};
   6 use strict;
   7 use warnings;
   8
   9 # Public accessors.
  10 __PACKAGE__->mk_accessors(
  11     qw( view uri_base template_root model loader display_tables ok_tables
  12       rows_per_page dsn user pass opts)
  13       );
  14
  15 # Should only be modified by model.
  16     __PACKAGE__->mk_ro_accessors( qw(
  17           classes
  18           tables
  19           table_to_class
  20     ) );
  21
  22 1;
  23
  24 =head1 NAME
  25
  26 Maypole::Config - Maypole Configuration Class
  27
  28 =head1 DESCRIPTION
  29
  30 This class stores all configuration data for your Maypole application.
  31
  32 =head2 view
  33
  34 The view class for your Maypole Application. Defaults to "Maypole::View::TT"
  35
  36 =head2 display_tables
  37
  38 =head2 ok_tables
  39
  40 =head2 model
  41
  42 =head2 loader
  43
  44 =head2 uri_base
  45
  46 =head2 classes
  47
  48 =head2 rows_per_page
  49
  50 =head2 dsn
  51
  52 =head2 user
  53
  54 =head2 pass
  55
  56 =head2 opts
  57
  58 +head2 table_to_root
  59
  60 =head2 template_root