[svn:parrot] r48131 - branches/html_cleanup/lib/Parrot/Docs
mikehh at svn.parrot.org
mikehh at svn.parrot.org
Tue Jul 20 18:01:33 UTC 2010
Author: mikehh
Date: Tue Jul 20 18:01:33 2010
New Revision: 48131
URL: https://trac.parrot.org/parrot/changeset/48131
Log:
fix codetest failure - trailing whitespace
Modified:
branches/html_cleanup/lib/Parrot/Docs/PodToHtml.pm
Modified: branches/html_cleanup/lib/Parrot/Docs/PodToHtml.pm
==============================================================================
--- branches/html_cleanup/lib/Parrot/Docs/PodToHtml.pm Tue Jul 20 18:01:22 2010 (r48130)
+++ branches/html_cleanup/lib/Parrot/Docs/PodToHtml.pm Tue Jul 20 18:01:33 2010 (r48131)
@@ -62,7 +62,7 @@
sub set_parent {
my $self = shift;
my $parent = shift;
- my $parent_title = shift;
+ my $parent_title = shift;
return if $parent eq 'index'; # this is the root, no need to track it 2x.
@@ -99,7 +99,7 @@
my $docroot = join('/', (('..') x ++$dirCount)) ;
my $resources_URL = $docroot . '/resources';
my $nav_HTML = qq{<a href="$docroot/html/index.html">Home</a>};
- if (exists $self->{parent}) {
+ if (exists $self->{parent}) {
$nav_HTML .= qq{ » <a href="$docroot/html/} . $self->{parent};
$nav_HTML .= qq{.html">} . $self->{parent_title} . '</a>';
}
More information about the parrot-commits
mailing list