[perl #75460] 'BEGIN' is run before 'use', even if later in the file

[Will Coleda via RT]

On Sun May 30 12:27:55 2010, moritz wrote:
> 
> # fine, no error:
> $ ./perl6 -e 'use Test'
> # not so nice:
> $ ./perl6 -e 'use Test; BEGIN { @*INC.unshift("t/spec/packages") }'
> ===SORRY!===
> Can't handle scope declarator my on modules yet
> 
> Apparently the BEGIN block is run before the 'use', otherwise it
> wouldn't have influenced the 'use' (and thus picked up the wrong 
Test.pm).
> 
> Cheers,
> Moritz

Seems fixed:

$ ./perl6 -e 'use Test'
$ ./perl6 -e 'use Test; BEGIN { @*INC.unshift("t/spec/packages") }'
$ git log | head -1
commit ebd4d87a0e074ed17dabeb2d33c620b91aee6fe9

tests?



-- 
Will "Coke" Coleda