From 29ada43f8e1f273f98403e655416530aeaab0888 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Mon, 28 Feb 2005 17:10:58 +0000
Subject: [PATCH] added named params to bootstrap_client to allow config file

git-svn-id: svn://svn.open-ils.org/ILS/trunk@142 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 OpenSRF/src/perlmods/OpenSRF/System.pm | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/OpenSRF/src/perlmods/OpenSRF/System.pm b/OpenSRF/src/perlmods/OpenSRF/System.pm
index a9f63575cb..5e70aca469 100644
--- a/OpenSRF/src/perlmods/OpenSRF/System.pm
+++ b/OpenSRF/src/perlmods/OpenSRF/System.pm
@@ -229,19 +229,18 @@ sub bootstrap {
 
 sub bootstrap_client {
 
+	my %params = @_;
+
+	$bootstrap_config_file = 
+		$params{config_file} || $bootstrap_config_file;
+
+	my $app = $params{client_name} || "client";
+
+
 	my $self = __PACKAGE__->instance();
 	load_bootstrap_config();
 	OpenSRF::Utils::Logger::set_config();
 
-	my $client_type = shift;
-	my $app;
-
-	if( defined($client_type) and $client_type ) {
-		$app = $client_type;
-	} else {
-		$app = "client";
-	}
-
 	OpenSRF::Transport::PeerHandle->construct( $app );
 
 }
-- 
2.43.2