r72422 - in /trunk/libapache2-mod-perl2/debian: libapache2-mod-perl2-doc.doc-base transform_pod2html.pl
periapt-guest at users.alioth.debian.org
periapt-guest at users.alioth.debian.org
Sat Apr 9 20:37:43 UTC 2011
Author: periapt-guest
Date: Sat Apr 9 20:37:37 2011
New Revision: 72422
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=72422
Log:
hopefully removed top-level docs safely now
Modified:
trunk/libapache2-mod-perl2/debian/libapache2-mod-perl2-doc.doc-base
trunk/libapache2-mod-perl2/debian/transform_pod2html.pl
Modified: trunk/libapache2-mod-perl2/debian/libapache2-mod-perl2-doc.doc-base
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libapache2-mod-perl2/debian/libapache2-mod-perl2-doc.doc-base?rev=72422&op=diff
==============================================================================
--- trunk/libapache2-mod-perl2/debian/libapache2-mod-perl2-doc.doc-base (original)
+++ trunk/libapache2-mod-perl2/debian/libapache2-mod-perl2-doc.doc-base Sat Apr 9 20:37:37 2011
@@ -13,6 +13,6 @@
/usr/share/doc/libapache2-mod-perl2-doc/todo
Format: HTML
-Index: /usr/share/doc/libapache2-mod-perl2-doc/docs/index.html
+Index: /usr/share/doc/libapache2-mod-perl2-doc/index.html
Files: /usr/share/doc/libapache2-mod-perl2-doc/docs
Modified: trunk/libapache2-mod-perl2/debian/transform_pod2html.pl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libapache2-mod-perl2/debian/transform_pod2html.pl?rev=72422&op=diff
==============================================================================
--- trunk/libapache2-mod-perl2/debian/transform_pod2html.pl (original)
+++ trunk/libapache2-mod-perl2/debian/transform_pod2html.pl Sat Apr 9 20:37:37 2011
@@ -15,8 +15,6 @@
Readonly my $CUR_DIR => $ARGV[0];
Readonly my $SRC_DIR => $ARGV[1];
Readonly my $DEST_DIR => $ARGV[2];
-#Readonly my $HTML_ROOT =>
-# '/cgi-bin/dwww/usr/share/doc/libapache2-mod-perl2-doc';
croak "No source directory: $SRC_DIR" if not -d $SRC_DIR;
croak "No destination directory: $DEST_DIR" if not -d $DEST_DIR;
@@ -27,7 +25,7 @@
find( \&transform_pod2html, $SRC_DIR );
my $template = HTML::Template->new(filename=>"$CUR_DIR/debian/index.tmpl", die_on_bad_params=>0);
-$template->param(%data);
+$template->param(%{$data{sections}->[0]});
open my $fh,'>', "$CUR_DIR/$DEST_DIR/index.html";
print {$fh} $template->output;
close$fh;
@@ -60,7 +58,6 @@
"--podroot=$CUR_DIR",
"--verbose",
"--htmldir=$CUR_DIR/debian",
-# "--htmlroot=$HTML_ROOT",
);
}
else {
More information about the Pkg-perl-cvs-commits
mailing list