From 01450268d10c12b63fe3ff8081b909ac533b4f1e Mon Sep 17 00:00:00 2001
From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Thu, 17 Feb 2005 21:54:08 +0000
Subject: [PATCH] added "api_name" wrapper method

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@82 9efc2488-bf62-4759-914b-345cdb29e865
---
 src/perlmods/OpenSRF/Application.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/perlmods/OpenSRF/Application.pm b/src/perlmods/OpenSRF/Application.pm
index 1f5325a..35e72b6 100644
--- a/src/perlmods/OpenSRF/Application.pm
+++ b/src/perlmods/OpenSRF/Application.pm
@@ -21,6 +21,11 @@ $log = 'OpenSRF::Utils::Logger';
 our $in_request = 0;
 our @pending_requests;
 
+sub api_name {
+	my $self = shift;
+	return $self->{api_name};
+}
+
 sub server_class {
 	my $class = shift;
 	if($class) {
-- 
2.43.2