X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fsplitpod;h=10fd6afb1112e922eabd4ab19315658752a0e5b2;hb=be5387481edebd42425976c372ac3dbafe134bde;hp=d5963bf4113460c7b2b31816b26b6ee22ecb75a5;hpb=8c98129fd14ae24244bde1f7f87508f60058f99b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pod/splitpod b/pod/splitpod index d5963bf..10fd6af 100755 --- a/pod/splitpod +++ b/pod/splitpod @@ -1,6 +1,6 @@ #!/usr/bin/perl -use lib '../lib'; # If you haven't installed perl yet. +BEGIN { push @INC, '../lib' } # If you haven't installed perl yet. use Pod::Functions; local $/ = ''; @@ -48,15 +48,15 @@ for $f ( keys %syn ) { $body =~ s/^=back\s*//m if $has_back and !$has_over; open (POD, "> $name.pod") || die "can't open $name.pod: $!"; print POD <