/[Frey]/trunk/bin/server-mojo.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /trunk/bin/server-mojo.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 633 - (show annotations)
Sun Nov 30 01:46:13 2008 UTC (14 years ago) by dpavlin
File MIME type: text/plain
File size: 797 byte(s)
work on Mojo server which is now partially supported
(form post doesn't seem to work yet)

This implementation is based on Mojo instead of Mojolicious
removing bunch of code and complications, so it will probably
become default once fixed
1 #!/usr/bin/perl
2
3 use strict;
4 use warnings;
5
6 # debug enviroment vars
7 $ENV{MOJO_TEMPLATE_DEBUG} = 1;
8 $ENV{MOJO_LOADER_DEBUG} = 1;
9 #$ENV{MOJO_BASE_DEBUG} = 1;
10 $ENV{MOJO_SERVER_DEBUG} = 1;
11 $ENV{MOJOX_ROUTES_DEBUG} = 1;
12 $ENV{MOJO_RELOAD} = 1;
13
14 use FindBin;
15
16 use lib "$FindBin::Bin/lib";
17 use lib "$FindBin::Bin/../lib";
18 use lib "$FindBin::Bin/../../lib";
19
20 $ENV{MOJO_APP} = 'Frey::Mojo';
21
22 use Frey::Bootstrap;
23
24 # Check if Mojo is installed
25 eval 'use Mojolicious::Scripts';
26 if ($@) {
27 print <<EOF;
28 It looks like you don't have the Mojo Framework installed.
29 Please visit http://getmojo.kraih.com for detailed installation instructions
30 or try to run Fray with one of other supported servers.
31
32 EOF
33 exit;
34 }
35
36 # Start the script system
37 my $scripts = Mojo::Scripts->new;
38 $scripts->run(@ARGV || 'daemon');

Properties

Name Value
svn:executable *

  ViewVC Help
Powered by ViewVC 1.1.26