aliasing respond_complete to respond

git-svn-id: svn://svn.open-ils.org/ILS/trunk@1127 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/OpenSRF/src/perlmods/OpenSRF/AppSession.pm b/OpenSRF/src/perlmods/OpenSRF/AppSession.pm
index c2de524..49bd93e 100644 (file)
--- a/OpenSRF/src/perlmods/OpenSRF/AppSession.pm
+++ b/OpenSRF/src/perlmods/OpenSRF/AppSession.pm
@@ -1003,6 +1003,7 @@ sub respond {
        my $resp = shift;
        push @{$$self{resp}}, $resp if (defined $resp);
 }
+sub respond_complete { respond(@_); }
 
 sub new {
        return bless({resp => []}, 'OpenSRF::AppSubrequest');