===================================================================
RCS file: /cvs/todotxt/Text-Todo/bin/dudelicious.pl,v
retrieving revision 1.7
retrieving revision 1.9
diff -u -r1.7 -r1.9
--- todotxt/Text-Todo/bin/dudelicious.pl 2010/04/30 07:23:32 1.7
+++ todotxt/Text-Todo/bin/dudelicious.pl 2010/04/30 18:30:57 1.9
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
package Dudelicious;
@@ -8,7 +8,7 @@
BEGIN {
use FindBin;
use lib "$FindBin::Bin/../lib";
- use lib "$FindBin::Bin/mojo/lib";
+ use lib "$FindBin::Bin/../mojo/lib";
}
use Carp qw/ carp croak /;
@@ -36,6 +36,8 @@
$self->render( files => \@files, layout => 'todotxt' );
} => 'index';
+get '/todotxt' => 'todotxt';
+
get '/l/:file' => sub {
my $self = shift;
my $file = $self->stash('file') . '.txt';
@@ -125,10 +127,24 @@
@@ layouts/todotxt.html.ep
- Funky!
+
+ Funky!
+
+
<%== content %>
+@@ todotxt.css.ep
+body {
+ background: LightGoldenRodYellow;
+ color: DarkSlateBlue;
+}
+
+.inplaceeditor-saving {
+ background: url(images/saving.gif) bottom right no-repeat;
+}
+
+
__END__
=head1 NAME
@@ -140,7 +156,7 @@
Since the $VERSION can't be automatically included,
here is the RCS Id instead, you'll have to look up $VERSION.
- $Id: dudelicious.pl,v 1.7 2010/04/30 06:23:32 andrew Exp $
+ $Id: dudelicious.pl,v 1.9 2010/04/30 17:30:57 andrew Exp $
=head1 SYNOPSIS