=================================================================== RCS file: /cvs/todotxt/Text-Todo/bin/dudelicious.pl,v retrieving revision 1.13 retrieving revision 1.14 diff -u -r1.13 -r1.14 --- todotxt/Text-Todo/bin/dudelicious.pl 2010/05/01 22:11:58 1.13 +++ todotxt/Text-Todo/bin/dudelicious.pl 2010/05/01 22:47:51 1.14 @@ -160,7 +160,8 @@ @@ index.html.ep % foreach my $file (@{ $files }) { -<%== $file %>
+% my ($basename) = $file =~ /^(.*?)(?:\.[^\.]+)?$/xms; +<%= $file %>
% } @@ list.html.ep @@ -178,7 +179,7 @@ @@ tags.html.ep % foreach my $tag (keys%{ $tags }) { -<%= $tag %> == <%= $tags->{$tag} %>
+<%= $tag %> == <%= $tags->{$tag} %>
% } @@ tag.html.ep @@ -218,7 +219,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.13 2010/05/01 21:11:58 andrew Exp $ + $Id: dudelicious.pl,v 1.14 2010/05/01 21:47:51 andrew Exp $ =head1 SYNOPSIS