No need for a ref HASH check.

This commit is contained in:
Colin Kuskie 2010-06-24 14:45:04 -07:00
parent 298cc41562
commit eb96c07d19
2 changed files with 0 additions and 6 deletions

View file

@ -64,9 +64,6 @@ around BUILDARGS => sub {
my $className = shift;
##Original arguments start here.
if (ref $_[0] eq 'HASH') {
return $className->$orig(@_);
}
my $protoSession = $_[0];
if (blessed $protoSession && $protoSession->isa('WebGUI::Session')) {
return $className->$orig(session => $protoSession);

View file

@ -39,9 +39,6 @@ around BUILDARGS => sub {
my $className = shift;
##Original arguments start here.
if (ref $_[0] eq 'HASH') {
return $className->$orig(@_);
}
my $protoSession = $_[0];
if (blessed $protoSession && $protoSession->isa('WebGUI::Session')) {
return $className->$orig(session => $protoSession);