From: miker Date: Tue, 15 Feb 2005 21:02:06 +0000 (+0000) Subject: accidentally reverted some fixes... puting them back X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=63d987676f9a1c42bc85ef0838263e71beba91fa;p=opensrf%2Fbjwebb.git accidentally reverted some fixes... puting them back git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@59 9efc2488-bf62-4759-914b-345cdb29e865 --- diff --git a/src/perlmods/OpenSRF/AppSession.pm b/src/perlmods/OpenSRF/AppSession.pm index fa503ed..b0dcc82 100644 --- a/src/perlmods/OpenSRF/AppSession.pm +++ b/src/perlmods/OpenSRF/AppSession.pm @@ -270,12 +270,12 @@ sub connect { my $app = shift; my $api_level = shift; - $api_level = 1 unless (defined $api_level) + $api_level = 1 unless (defined $api_level); $self = $class->create($app, @_) if (!ref($self)); return undef unless ($self); - $self->{api_level} = $api_level + $self->{api_level} = $api_level; $self->reset; $self->state(CONNECTING);