From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Mon, 25 Jul 2005 16:04:20 +0000 (+0000)
Subject: adding echo method
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=66f94e07c6e17f2847f24c32dd58b682a97b394a;p=opensrf%2Fbjwebb.git

adding echo method


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

diff --git a/src/perlmods/OpenSRF/Application.pm b/src/perlmods/OpenSRF/Application.pm
index dffb54d..194d7d5 100644
--- a/src/perlmods/OpenSRF/Application.pm
+++ b/src/perlmods/OpenSRF/Application.pm
@@ -500,7 +500,6 @@ __PACKAGE__->register_method(
 	method => 'introspect',
 	api_name => 'opensrf.system.method.all'
 );
-
 __PACKAGE__->register_method(
 	stream => 1,
 	method => 'introspect',
@@ -508,6 +507,21 @@ __PACKAGE__->register_method(
 	api_name => 'opensrf.system.method'
 );
 
+sub echo_method {
+	my $self = shift;
+	my $client = shift;
+	my @args = @_;
+
+	$client->respond( $_ ) for (@args);
+	return undef;
+}
+__PACKAGE__->register_method(
+	stream => 1,
+	method => 'echo_method',
+	argc => 1,
+	api_name => 'opensrf.system.echo'
+);
+
 sub make_stream_atomic {
 	my $self = shift;
 	my $req = shift;