diff --git a/lib/NGCP/BulkProcessor/Globals.pm b/lib/NGCP/BulkProcessor/Globals.pm index be13fae..a9e2b03 100644 --- a/lib/NGCP/BulkProcessor/Globals.pm +++ b/lib/NGCP/BulkProcessor/Globals.pm @@ -36,7 +36,7 @@ our @EXPORT_OK = qw( $system_instance_label $local_ip $local_fqdn - $application_version + get_application_version $application_path $executable_path $working_path @@ -145,7 +145,6 @@ our $system_instance_label; our $local_ip = get_ipaddress(); our $local_fqdn = get_hostfqdn(); -our $application_version = ($main::VERSION // $VERSION); our $application_path = get_applicationpath(); our $executable_path = $FindBin::Bin . '/'; #my $remotefilesystem = "MSWin32"; @@ -490,6 +489,13 @@ sub _prepare_working_paths { } + +sub get_application_version { + + return $main::VERSION // $VERSION; + +} + sub get_applicationpath { return dirname(abs_path(__FILE__)) . '/'; diff --git a/lib/NGCP/BulkProcessor/LoadConfig.pm b/lib/NGCP/BulkProcessor/LoadConfig.pm index 8f4bb4c..31d5676 100644 --- a/lib/NGCP/BulkProcessor/LoadConfig.pm +++ b/lib/NGCP/BulkProcessor/LoadConfig.pm @@ -7,7 +7,7 @@ use NGCP::BulkProcessor::Globals qw( $system_name $system_instance_label $local_fqdn - $application_version + get_application_version $application_path $working_path $executable_path @@ -173,7 +173,7 @@ sub _splashinfo { my ($configfile) = @_; configurationinfo($system_name . (length($system_instance_label) ? ' (' . $system_instance_label . ')' : '') . ' [' . $local_fqdn . ']',getlogger(__PACKAGE__)); - configurationinfo('application version: ' . $application_version,getlogger(__PACKAGE__)); + configurationinfo('application version: ' . get_application_version(),getlogger(__PACKAGE__)); configurationinfo('application path: ' . $application_path,getlogger(__PACKAGE__)); configurationinfo('working path: ' . $working_path,getlogger(__PACKAGE__)); configurationinfo($cpucount . ' cpu(s), multithreading ' . ($enablemultithreading ? 'enabled' : 'disabled'),getlogger(__PACKAGE__));