refactored copy targeter to use new JS copy tester; adjusted object relationships...
authormiker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Sat, 11 Feb 2006 05:20:31 +0000 (05:20 +0000)
committermiker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Sat, 11 Feb 2006 05:20:31 +0000 (05:20 +0000)
git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@636 9efc2488-bf62-4759-914b-345cdb29e865

src/perlmods/OpenSRF/AppSession.pm

index b694a29..97a6170 100644 (file)
@@ -1015,7 +1015,9 @@ sub respond {
 sub respond_complete { respond(@_); }
 
 sub new {
-       return bless({resp => []}, 'OpenSRF::AppSubrequest');
+       my $class = shift;
+       $class = ref($class) || $class;
+       return bless({resp => [], @_}, $class);
 }
 
 sub responses { @{$_[0]->{resp}} }