[RESEND] FETCH/STORE/LENGTH callbacks for numbered capture variables

[Joshua N Pritikin]

I don't think this message reached the mailing list?

Can somebody suggest some other read-only variable or should I just
disable the test?

--
Make April 15 just another day, visit http://fairtax.org

[Zefram]

Joshua N Pritikin wrote:
>I don't think this message reached the mailing list?

It did. I received it the first time, and I replied:

$$ $] $^V

Not many that are really guaranteed to remain read-only, are there.

-zefram

[Joshua N Pritikin]

On Sat, May 19, 2007 at 11:11:25AM +0100, Zefram wrote:
> Joshua N Pritikin wrote:
> >I don't think this message reached the mailing list?
>
> It did. I received it the first time, and I replied:

Hrm, somehow I missed your reply as well!

> $$ $] $^V
>
> Not many that are really guaranteed to remain read-only, are there.

So it is as simple as this? Can somebody confirm?

diff --git a/t/unconfigured.t b/t/unconfigured.t
--- a/t/unconfigured.t
+++ b/t/unconfigured.t
@@ -23,5 +23,5 @@ my $var = 1;
eval { Event->var(@p, poll => 0, var => \$var) };
ok $@, '/without poll events/';

-eval { Event->var(@p, var => \$1) };
+eval { Event->var(@p, var => \$$) };
ok $@, '/read\-only/';