TreeOfTexts/lib/TreeOfTexts.pm

   1 package TreeOfTexts;
   2 use Moose;
   3 use namespace::autoclean;
   4
   5 use Catalyst::Runtime 5.80;
   6
   7 # Set flags and add plugins for the application.
   8 #
   9 # Note that ORDERING IS IMPORTANT here as plugins are initialized in order,
  10 # therefore you almost certainly want to keep ConfigLoader at the head of the
  11 # list if you're using it.
  12 #
  13 #         -Debug: activates the debug mode for very useful log messages
  14 #   ConfigLoader: will load the configuration from a Config::General file in the
  15 #                 application's home directory
  16 # Static::Simple: will serve static files from the application's root
  17 #                 directory
  18
  19 use Catalyst qw/
  20     -Debug
  21     ConfigLoader
  22     Static::Simple
  23     Unicode::Encoding
  24 /;
  25
  26 extends 'Catalyst';
  27
  28 our $VERSION = '0.01';
  29
  30 # Configure the application.
  31 #
  32 # Note that settings in treeoftexts.conf (or other external
  33 # configuration file that you set up manually) take precedence
  34 # over this when using ConfigLoader. Thus configuration
  35 # details given here can function as a default configuration,
  36 # with an external configuration file acting as an override for
  37 # local deployment.
  38
  39 __PACKAGE__->config(
  40     name => 'TreeOfTexts',
  41     # Disable deprecated behavior needed by old applications
  42     disable_component_resolution_regex_fallback => 1,
  43     default_view => 'TT',
  44 );
  45
  46 # Start the application
  47 __PACKAGE__->setup();
  48
  49
  50 =head1 NAME
  51
  52 TreeOfTexts - Catalyst based application
  53
  54 =head1 SYNOPSIS
  55
  56     script/treeoftexts_server.pl
  57
  58 =head1 DESCRIPTION
  59
  60 [enter your description here]
  61
  62 =head1 SEE ALSO
  63
  64 L<TreeOfTexts::Controller::Root>, L<Catalyst>
  65
  66 =head1 AUTHOR
  67
  68 Tara L Andrews
  69
  70 =head1 LICENSE
  71
  72 This library is free software. You can redistribute it and/or modify
  73 it under the same terms as Perl itself.
  74
  75 =cut
  76
  77 1;