Changeset 13526 for lang/perl/Ulgori/trunk/ulgori.pl

Timestamp:

06/08/08 22:55:30 (5 years ago)

Author:

tokuhirom

Message:

some logic move from ulgori.pl to Ulgori.pm

Files:

• lang/perl/Ulgori/trunk/ulgori.pl (modified) (1 diff)

lang/perl/Ulgori/trunk/ulgori.pl

@@ -5 +5 @@
 use File::Spec::Functions;
 use lib catfile($FindBin::Bin, 'lib');
-use HTTP::Engine middlewares => [
-    qw/
-        ModuleReload
-        DebugScreen
-        DoCoMoGUID
-        +Ulgori::Web::Middleware::Encoding
-    /
-];
-use Ulgori::Web::Handler;
-use Ulgori::Config;
-use Ulgori::ComponentManager::Singleton;
+use Ulgori;
 
-Ulgori::ComponentManager::Singleton->get( 'Model::Log' ); # preload.
+Ulgori->bootstrap();
 
-my $cfg = Ulgori::Config->instance;
-
-HTTP::Engine->new(
-    interface => {
-        %{ $cfg->{Engine} },
-        request_handler => \&Ulgori::Web::Handler::handler,
-    },
-)->run;
-