=================================================================== RCS file: /cvs/todotxt/Text-Todo/bin/dudelicious.pl,v retrieving revision 1.1 retrieving revision 1.4 diff -u -r1.1 -r1.4 --- todotxt/Text-Todo/bin/dudelicious.pl 2010/04/26 20:44:15 1.1 +++ todotxt/Text-Todo/bin/dudelicious.pl 2010/04/28 01:50:47 1.4 @@ -1,5 +1,11 @@ #!/usr/bin/env perl +package Dudelicious; + +use version; our $VERSION = qv('0.1.0'); + +BEGIN { use FindBin; use lib "$FindBin::Bin/mojo/lib" } + use Mojolicious::Lite; get '/' => 'index'; @@ -9,7 +15,7 @@ $self->render_text($self->param('groovy'), layout => 'funky'); }; -app->start; +app->start unless caller(); __DATA__ @@ index.html.ep @@ -21,3 +27,103 @@