From 3700ec4b34d39d86b6fdf550d85eab4cd2d1b414 Mon Sep 17 00:00:00 2001 From: erickson 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/OpenSRF/trunk@123 9efc2488-bf62-4759-914b-345cdb29e865 --- src/perlmods/OpenSRF/System.pm | 17 ++++++++--------- 1 file changed, 8 insertions(+), 9 deletions(-) diff --git a/src/perlmods/OpenSRF/System.pm b/src/perlmods/OpenSRF/System.pm index a9f6357..5e70aca 100644 --- a/src/perlmods/OpenSRF/System.pm +++ b/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.11.0