--- trunk/lib/WebPAC/Lookup.pm 2005/12/27 22:26:43 330 +++ trunk/lib/WebPAC/Lookup.pm 2006/02/15 14:49:48 393 @@ -59,8 +59,8 @@ =cut sub new { - my $class = shift; - my $self = {@_}; + my $class = shift; + my $self = {@_}; bless($self, $class); my $log = $self->_get_logger();