From: Rafael Garcia-Suarez Date: Fri, 13 Jul 2007 08:29:28 +0000 (+0000) Subject: Avoid POD in test files X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a37cecd08c3ae8d213618c5781a947d5c10ae92f;p=p5sagit%2Fp5-mst-13.2.git Avoid POD in test files p4raw-id: //depot/perl@31604 --- diff --git a/lib/SelfLoader-buggy.t b/lib/SelfLoader-buggy.t index 07409c3..02da93c 100644 --- a/lib/SelfLoader-buggy.t +++ b/lib/SelfLoader-buggy.t @@ -27,25 +27,22 @@ sub buggy } -=head1 RT 40216 - - by Bo Lindbergh , at Aug 22, 2006 5:42 PM - -In the example below, there's a syntax error in the selfloaded -code for main::buggy. When the eval fails, SelfLoader::AUTOLOAD -tries to report this with "croak $@;". Unfortunately, -SelfLoader::croak does "require Carp;" without protecting $@, -which gets clobbered. The program then dies with the -uninformative message " at ./example line 3". - -#! /usr/local/bin/perl -use SelfLoader; -buggy(); -__END__ -sub buggy -{ - +>*; -} - -=cut - +# RT 40216 +# +# by Bo Lindbergh , at Aug 22, 2006 5:42 PM +# +# In the example below, there's a syntax error in the selfloaded +# code for main::buggy. When the eval fails, SelfLoader::AUTOLOAD +# tries to report this with "croak $@;". Unfortunately, +# SelfLoader::croak does "require Carp;" without protecting $@, +# which gets clobbered. The program then dies with the +# uninformative message " at ./example line 3". +# +# #! /usr/local/bin/perl +# use SelfLoader; +# buggy(); +# __END__ +# sub buggy +# { +# +>*; +# }