From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sun, 21 Sep 2003 09:22:57 +0000 (+0000)
Subject: Handle also the curliffy files when tocing.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=16114dde8ca7b3eded13218a07f79301ce8c5946;p=p5sagit%2Fp5-mst-13.2.git

Handle also the curliffy files when tocing.

p4raw-id: //depot/perl@21298
---

diff --git a/pod/buildtoc b/pod/buildtoc
index fa26d66..d66b712 100644
--- a/pod/buildtoc
+++ b/pod/buildtoc
@@ -343,6 +343,7 @@ sub podset {
     my $pod;
 
     while(<>) {
+	tr/\015//d;
 	if (s/^=head1 (NAME)\s*/=head2 /) {
 	    $pod = path2modname($ARGV);
 	    unhead1();