See Changes

Changes

@@ -1,5 +1,14 @@
 Revision history for Catalyst-Controller-POD
 
+1.0.0    2011-01-25
+         - Using Google Prettify for Source Code Highlighting
+         - Updated ExtJS to 3.3.1
+         - using Dist::Zilla
+
+0.02008  2010-06-24
+         - using Static::Simple to deliver static files
+         - Cleanup
+
 0.02007  2010-03-07
          - Added additional configuration options:
            expanded_module_tree, home_tab_content, initial_module,

dist.ini

@@ -0,0 +1,30 @@
+name    = Catalyst-Controller-POD
+author  = Moritz Onken
+license = BSD
+copyright_holder = Moritz Onken
+
+version = 1.0.0
+
+[@Filter]
+-bundle = @JQUELIN
+-remove = AutoVersion
+
+[Prereqs]
+
+File::Find =  0.05
+File::ShareDir =  0.05
+File::Slurp =  9999
+Pod::Simple =  3.05
+JSON::XS =  2.21
+Pod::POM =  0.17
+LWP::Simple =  5.810
+XML::Simple = 2.18
+List::MoreUtils =  0.22
+Class::Accessor::Fast =  0.31
+Catalyst::Controller =  0
+Pod::POM::View::TOC =  0.02
+parent =  0
+Path::Class::File =  0
+Catalyst::Plugin::Static::Simple =  0
+Test::More =  0.42
+Test::WWW::Mechanize::Catalyst =  0.41

lib/Catalyst/Controller/POD.pm

@@ -1,4 +1,5 @@
 package Catalyst::Controller::POD;
+# ABSTRACT: Serves PODs right from your Catalyst application
 use warnings;
 use strict;
 use File::Find qw( find );
@@ -16,8 +17,6 @@ use Catalyst::Controller::POD::Template;
 
 use base "Catalyst::Controller";
 
-our $VERSION = 0.02007;
-
 __PACKAGE__->mk_accessors(qw(_dist_dir inc namespaces self dir show_home_tab initial_module home_tab_content expanded_module_tree));
 
 __PACKAGE__->config(
@@ -209,7 +208,7 @@ sub _root {
 sub new {
     my $class = shift;
     my $self  = $class->next::method(@_);
-    my $file  = Path::Class::File->new( 'share', 'dist.js' );
+    my $file  = Path::Class::File->new( 'share', 'docs.js' );
     eval {
         $file = Path::Class::File->new(
             dist_file( 'Catalyst-Controller-POD', 'docs.js' ) );
@@ -261,10 +260,6 @@ sub _replace_template_vars {
 
 __END__
 
-=head1 NAME
-
-Catalyst::Controller::POD - Serves PODs right from your Catalyst application
-
 =head1 SYNOPSIS
 
 Create a new controller and paste this code:
@@ -296,7 +291,9 @@ There is also a TOC which is always visible and scrolls the current POD to the s
 It is written using a JavaScript framework called ExtJS (L<http://www.extjs.com>) which
 generate beautiful and intuitive interfaces.
 
-Have a look at L<http://cpan.org/authors/id/P/PE/PERLER/pod-images/pod-encyclopedia-01.png>
+Have a look at L<http://cpan.org/authors/id/P/PE/PERLER/pod-images/pod-encyclopedia-01.png>.
+
+B<< L<Catalyst::Plugin::Static::Simple> is required and has to be loaded. >>
 
 =head1 CONFIGURATION
 
@@ -364,62 +361,8 @@ can use it as a stand-alone POD server.
 
 Write more tests!
 
-=head1 AUTHOR
-
-Moritz Onken <onken@netcubed.de>
-
 =head1 CONTRIBUTORS
 
 Tristan Pratt
 
-=head1 BUGS
-
-Please report any bugs or feature requests to C<bug-catalyst-controller-pod at rt.cpan.org>, or through
-the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Catalyst-Controller-POD>.  I will be notified, and then you'll
-automatically be notified of progress on your bug as I make changes.
-
-
-
-
-=head1 SUPPORT
-
-You can find documentation for this module with the perldoc command.
-
-    perldoc Catalyst::Controller::POD
-
-
-You can also look for information at:
-
-=over 4
-
-=item * RT: CPAN's request tracker
-
-L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Catalyst-Controller-POD>
-
-=item * AnnoCPAN: Annotated CPAN documentation
-
-L<http://annocpan.org/dist/Catalyst-Controller-POD>
-
-=item * CPAN Ratings
-
-L<http://cpanratings.perl.org/d/Catalyst-Controller-POD>
-
-=item * Search CPAN
-
-L<http://search.cpan.org/dist/Catalyst-Controller-POD>
-
-=back
-
-
-=head1 ACKNOWLEDGEMENTS
-
-
-=head1 COPYRIGHT & LICENSE
-
-Copyright 2008 Moritz Onken, all rights reserved.
-
-This program is free software; you can redistribute it and/or modify it
-under the same terms as Perl itself.
-
-
 =cut

lib/Catalyst/Controller/POD/POM/View.pm

@@ -58,7 +58,7 @@ sub view_pod {
 <div class="pod">
 ~
    . $pod->content->present($self)
-        . "</div></body></html>\n";
+        . "<script>prettyPrint()</script></div></body></html>\n";
 }
 
 sub view_verbatim {
@@ -84,7 +84,7 @@ sub view_verbatim {
         last if($last);
     }
 
-    return "<pre>$text</pre>\n\n";
+    return "<pre class=\"prettyprint lang-perl\">$text</pre>\n\n";
 }
 
 sub view_seq_link_transform_path {

lib/Catalyst/Controller/POD/Template.pm

@@ -16,6 +16,8 @@ sub get {
     <link rel="stylesheet" href="$root/docs.css" type="text/css" />
     <script type="text/javascript" src="$root/ext/adapter/ext/ext-base.js"></script>
     <script type="text/javascript" src="$root/ext/ext-all.js"></script>
+    <link href="$root/prettify/prettify.css" type="text/css" rel="stylesheet" />
+    <script type="text/javascript" src="$root/prettify/prettify.js"></script>
     </head>
     <body>
         <script type="text/javascript">Ext.BLANK_IMAGE_URL = "$root/ext/resources/images/default/s.gif";</script>