apps/scan.pl: locate modules correctly, v5.010

diff --git a/apps/scan.pl b/apps/scan.pl
index 165844729b132ab1d3ac929d975b40a887c51d39..4c15cf877bc761097f9e13650179d4c0ab22a75f 100755 (executable)
--- a/apps/scan.pl
+++ b/apps/scan.pl
@@ -1,11 +1,12 @@
 #!/usr/bin/perl -w
 use strict;
-use v5.012;
+use v5.010;
 
 use File::Temp qw/tempdir/;
+use File::Basename;
 use Data::Dumper;
 
-use lib '../modules';
+use lib dirname($0)."/modules";
 use CONFIG;
 use FTNMAIL;
 use MSGBASE;