diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-22 11:29:03 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-22 11:29:03 +0000 |
| commit | 798bec46ce5ad8ebd5417d3924d03658fcf2ed0b (patch) | |
| tree | 275113221556dd39972b9053865ab357425f1272 /t | |
| parent | a86d78b98bbb3a5fa56caee3b81e72336148be12 (diff) | |
| download | perl-798bec46ce5ad8ebd5417d3924d03658fcf2ed0b.tar.gz | |
Revert change #26185, which could have some unwanted side-effects.
(lib/warnings.t had failures due to this patch.)
Moreover Dave Mitchell correctly pointed out that [perl #37722]
wasn't really a bug.
p4raw-link: @26185 on //depot/perl: 91cec4fb3b9ce703dab10db05e717127b2a9ed44
p4raw-id: //depot/perl@26190
Diffstat (limited to 't')
| -rwxr-xr-x | t/op/tie.t | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/t/op/tie.t b/t/op/tie.t index 8cb45398ad..1fe37e1624 100755 --- a/t/op/tie.t +++ b/t/op/tie.t @@ -578,10 +578,3 @@ tie $h, "main"; print $h,"\n"; EXPECT 3.3 -######## -sub TIESCALAR { bless {} } -sub FETCH { shift()->{i} ++ } -tie $h, "main"; -print $h.$h; -EXPECT -01 |