From 6dd24a9dad90a1c1ce5142ded1a74dfd12182276 Mon Sep 17 00:00:00 2001 From: erickson Date: Tue, 1 Mar 2005 00:19:27 +0000 Subject: [PATCH] changed some ps output. SettingsClient now calls to opensrf.settings to get the settings. git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@128 9efc2488-bf62-4759-914b-345cdb29e865 --- src/perlmods/OpenSRF/System.pm | 8 +++++--- src/perlmods/OpenSRF/UnixServer.pm | 2 +- src/perlmods/OpenSRF/Utils/SettingsClient.pm | 2 +- 3 files changed, 7 insertions(+), 5 deletions(-) diff --git a/src/perlmods/OpenSRF/System.pm b/src/perlmods/OpenSRF/System.pm index aeda836..695d27b 100644 --- a/src/perlmods/OpenSRF/System.pm +++ b/src/perlmods/OpenSRF/System.pm @@ -227,6 +227,8 @@ sub bootstrap { # ---------------------------------------------- # Bootstraps a single client connection. +# named params are 'config_file' and 'client_name' +# sub bootstrap_client { my $self = shift; @@ -294,7 +296,7 @@ sub launch_settings { } else { my $apname = "settings"; - $0 = "OpenSRF App ($apname)"; + #$0 = "OpenSRF App [$apname]"; eval _unixserver( "settings" ); if($@) { die "$@\n"; } exit; @@ -315,7 +317,7 @@ sub launch_settings_listener { } else { my $apname = $app; - $0 = "OpenSRF listener ($apname)"; + $0 = "OpenSRF listener [$apname]"; eval _listener( $app ); exit; } @@ -367,7 +369,7 @@ sub launch_listener { } else { my $apname = $app; - $0 = "OpenSRF listener ($apname)"; + $0 = "OpenSRF listener [$apname]"; eval _listener( $app ); exit; } diff --git a/src/perlmods/OpenSRF/UnixServer.pm b/src/perlmods/OpenSRF/UnixServer.pm index 02c3aa7..38cfe56 100644 --- a/src/perlmods/OpenSRF/UnixServer.pm +++ b/src/perlmods/OpenSRF/UnixServer.pm @@ -137,7 +137,7 @@ sub serve { my $app = $self->app(); - $0 = "OpenSRF master ($app)"; + $0 = "OpenSRF master [$app]"; my $client = OpenSRF::Utils::SettingsClient->new(); $logger->transport("Max Req: " . $client->config_value("apps", $app, "unix_config", "max_requests" ), INFO ); diff --git a/src/perlmods/OpenSRF/Utils/SettingsClient.pm b/src/perlmods/OpenSRF/Utils/SettingsClient.pm index 6dccf12..c8bab67 100755 --- a/src/perlmods/OpenSRF/Utils/SettingsClient.pm +++ b/src/perlmods/OpenSRF/Utils/SettingsClient.pm @@ -66,7 +66,7 @@ sub grab_host_config { warn "Grabbing Host config for $host\n"; OpenSRF::System->bootstrap_client(client_name => "system_client"); - $session = OpenSRF::AppSession->create( "settings" ) unless $session; + $session = OpenSRF::AppSession->create( "opensrf.settings" ) unless $session; my $bsconfig = OpenSRF::Utils::Config->current; my $resp; -- 2.11.0