diff --git a/src/main/scripts/ncm-query b/src/main/scripts/ncm-query index aced3f7..79d90bd 100755 --- a/src/main/scripts/ncm-query +++ b/src/main/scripts/ncm-query @@ -133,7 +133,9 @@ toolsuite. package query; +pop @INC if $INC[-1] eq '.'; use lib "/usr/lib/perl"; + use CAF::Application; use CAF::Reporter; use LC::Exception qw (SUCCESS throw_error);