Kaydet (Commit) c942bbb6 authored tarafından Kurt Zenker's avatar Kurt Zenker

#i106558# output warning in get_module_path only if debug is set

üst 787d142a
...@@ -47,6 +47,8 @@ use Carp; ...@@ -47,6 +47,8 @@ use Carp;
use Cwd; use Cwd;
use File::Basename; use File::Basename;
my $debug = 0;
##### profiling ##### ##### profiling #####
##### ctor ##### ##### ctor #####
...@@ -112,7 +114,7 @@ sub get_module_path { ...@@ -112,7 +114,7 @@ sub get_module_path {
if (defined ${$self->{MODULE_PATHS}}{$module}) { if (defined ${$self->{MODULE_PATHS}}{$module}) {
return ${$self->{MODULE_PATHS}}{$module}; return ${$self->{MODULE_PATHS}}{$module};
} else { } else {
Carp::cluck("No path for module $module in active repositories!!\n"); Carp::cluck("No path for module $module in active repositories!!\n") if ($debug);
return undef; return undef;
}; };
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment