diff options
author | Chad Elliott <elliottc@objectcomputing.com> | 2023-04-26 08:24:33 -0500 |
---|---|---|
committer | Chad Elliott <elliottc@objectcomputing.com> | 2023-04-26 08:24:33 -0500 |
commit | 1a9aa5e55a091fd42ad4d72c99e33828b322b8ab (patch) | |
tree | b35558d8ee134e02ac75a7b687f473e6a829c946 | |
parent | 2df8d6501eb4bb6f977929585dc6da2f898f9099 (diff) | |
download | MPC-1a9aa5e55a091fd42ad4d72c99e33828b322b8ab.tar.gz |
Added a deug message for finding command helpers.
-rw-r--r-- | modules/CommandHelper.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/modules/CommandHelper.pm b/modules/CommandHelper.pm index 2437edfc..98053a08 100644 --- a/modules/CommandHelper.pm +++ b/modules/CommandHelper.pm @@ -51,6 +51,7 @@ sub get { ## create a singleton of that type and return it. foreach my $inc (@INC) { if (-r "$inc/$type.pm") { + OutputMessage::debug(undef, "Found $type.pm in $inc"); require "$type.pm"; $required{$type} = $type->new(); return $required{$type}; |