/[webpac2]/Webpacus/lib/Webpacus.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /Webpacus/lib/Webpacus.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 83 by dpavlin, Mon Nov 21 17:46:27 2005 UTC revision 97 by dpavlin, Tue Nov 22 12:57:35 2005 UTC
# Line 9  use warnings; Line 9  use warnings;
9  #         -Debug: activates the debug mode for very useful log messages  #         -Debug: activates the debug mode for very useful log messages
10  # Static::Simple: will serve static files from the applications root directory  # Static::Simple: will serve static files from the applications root directory
11  #  #
12  use Catalyst qw/-Debug Static::Simple Prototype Unicode::Encoding/;  use Catalyst qw/-Debug
13            Static::Simple
14            Prototype
15            Unicode::Encoding
16            Config::YAML
17    /;
18    #       FormValidator
19    #       FillInForm
20    
21  our $VERSION = '0.01';  our $VERSION = '0.01';
22    
23  #  #
24  # Configure the application  # Configure the application
25  #  #
26  __PACKAGE__->config( name => 'Webpacus', encoding => 'ISO-8859-2' );  __PACKAGE__->config(
27            name => 'Webpacus',
28            encoding => 'ISO-8859-2',
29            config_file => 'config.yml',
30    );
31    
32  #  #
33  # Start the application  # Start the application
# Line 57  sub end : Private { Line 68  sub end : Private {
68    
69      # Forward to View unless response body is already defined      # Forward to View unless response body is already defined
70      $c->forward('View::TT') unless $c->response->body;      $c->forward('View::TT') unless $c->response->body;
71    
72        $c->log->debug( $c->response->body );
73    
74    #    $c->fillform; # defaults to $c->req->parameters
75  }  }
76    
77  =back  =back
Legend:
Removed from v.83  
changed lines
  Added in v.97
  ViewVC Help
Powered by ViewVC 1.1.26