This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[PATCH] Harness.pm bug w/perl5.004 & VMS
authorDan Sugalski <sugalsd@lbcc.cc.or.us>
Wed, 11 Jun 1997 00:00:00 +0000 (12:00 +1200)
committerTim Bunce <Tim.Bunce@ig.co.uk>
Wed, 11 Jun 1997 00:00:00 +0000 (12:00 +1200)
commit2d8ca5da0888ace50c79900af6ef82761bea90b2
treea941a0909a4b354d8cb4e4bb2c11f32bea99c737
parent25dc8abb365ced9012e8a069c3d136dc39512341
[PATCH] Harness.pm bug w/perl5.004 & VMS

Harness.pm's got a bug under VMS. $estatus is my'd and assigned to at the
same time--unfortunately the assignment's a trinary conditional that uses
$estatus, presumably before the my context is fully established. It
generates an estatus doesn't exist error message for the first test only,
and, after all the t/*.t tests are through, kills perl with an ACCVIO.

The following patch just splits the my and assignment into two separate
statements, which makes perl much happier.

p5p-msgid: 3.0.1.32.19970530102300.008a2730@stargate.lbcc.cc.or.us
lib/Test/Harness.pm