[Bioperl-l] Vector.pm commit
Paul-Christophe Varoutas
paul-christophe.varoutas@curie.fr
Mon, 29 Jan 2001 01:12:49 +0100
cvs checkedout under cygwin (win2000).
I noticed that when I make test under perl 5.6.1 / cygwin I have these 2
lines appearing a *lot* of times:
Ambiguous call resolved as CORE::shift(), qualify as such or use & at
blib/lib/B
io/Root/Vector.pm line 948.
Ambiguous call resolved as CORE::shift(), qualify as such or use & at
blib/lib/B
io/Root/Vector.pm line 973.
I guess this is because there is a shift() sub in Vector.pm, line 722:
#---------
sub shift {
#---------
my($self,%param) = @_;
$self = $self->first();
$self = $self->remove(%param);
}
Lines 948 and 973 are of this type:
#-------------
sub valid_any {
#-------------
my $self = shift;
...
I didn't have these warnings when I make tested with perl 5.004_04 / SunOS 5.6.
I replaced
$self = shift;
by
$self = &shift(@_); (thanks Ewan)
in both lines.
Seems to be OK with perl 5.6.1 / cygwin and perl 5.004_04 / SunOS 5.6.
paulc