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

diff --git a/src/perlmods/OpenSRF/System.pm b/src/perlmods/OpenSRF/System.pm
index a9f6357..5e70aca 100644 (file)
--- 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 );
 
 }