From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Mon, 14 Feb 2005 18:31:38 +0000 (+0000)
Subject: add api_level to introspection responses
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=4d80c76d1be25ac682a405920512f1a4e9c5cb99;p=working%2FOpenSRF.git

add api_level to introspection responses


git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@49 9efc2488-bf62-4759-914b-345cdb29e865
---

diff --git a/src/perlmods/OpenSRF/Application.pm b/src/perlmods/OpenSRF/Application.pm
index 3b0889a..d277d20 100644
--- a/src/perlmods/OpenSRF/Application.pm
+++ b/src/perlmods/OpenSRF/Application.pm
@@ -282,7 +282,7 @@ sub introspect {
 	my $client = shift;
 
 	for my $api_level ( 1 .. $#_METHODS ) {
-		$client->respond( $_METHODS[$api_level] );
+		$client->respond( { $api_level => $_METHODS[$api_level] } );
 	}
 
 	return undef;