diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2003-01-12 09:54:42 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2003-01-12 09:54:42 +0000 |
| commit | 2002d88613b158e3188843b6077ec25ba9bcad33 (patch) | |
| tree | 453fb6dc93d7f041b9d5b888064fe50432d50479 /t/op/taint.t | |
| parent | 6e6ca6c3d8f9eaf6e2364f1fef07b3f472f0a846 (diff) | |
| parent | 0202f2d889312a2f8a1479686ebbafc67572bb36 (diff) | |
| download | perl-2002d88613b158e3188843b6077ec25ba9bcad33.tar.gz | |
Integrate Mainline
p4raw-id: //depot/perlio@18469
Diffstat (limited to 't/op/taint.t')
| -rwxr-xr-x | t/op/taint.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/taint.t b/t/op/taint.t index 4b8039cf6c..686354ed2f 100755 --- a/t/op/taint.t +++ b/t/op/taint.t @@ -904,7 +904,7 @@ else { } -ok( ${^TAINT}, '$^TAINT is on' ); +ok( ${^TAINT} == 1, '$^TAINT is on' ); eval { ${^TAINT} = 0 }; ok( ${^TAINT}, '$^TAINT is not assignable' ); |