From: Norton Allen Date: Fri, 5 Sep 1997 00:00:00 +0000 (+0000) Subject: fix poor t/op/runlevel.t test X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ca0b63a54384876a335df571abef7f428d67e288;p=p5sagit%2Fp5-mst-13.2.git fix poor t/op/runlevel.t test This patch fixes the Can't "goto" outside block test. Before, the test only hit the desired error if the system sort did a compare where $a was 0, which is not guaranteed (and does not occur on at least one system.) Now both arguments are tested. Credited: Hugo van der Sanden Credited: Gurusamy Sarathy p5p-msgid: 199709261458.KAA28611@dolores.harvard.edu --- diff --git a/t/op/runlevel.t b/t/op/runlevel.t index 2be2eec..6693a82 100755 --- a/t/op/runlevel.t +++ b/t/op/runlevel.t @@ -304,7 +304,7 @@ EXPECT 0, 1, 2, 3 ######## sub foo { - goto bar if $a == 0; + goto bar if $a == 0 || $b == 0; $a <=> $b; } @a = (3, 2, 0, 1);