improve perl_checker's SNR

12 files changed, 17 insertions, 1 deletions

diff --git a/lib/Xconfig/default.pm b/lib/Xconfig/default.pm
index 586e4a4..1c88ebf 100644
--- a/lib/Xconfig/default.pm
+++ b/lib/Xconfig/default.pm
@@ -5,6 +5,7 @@ use strict;
 
 use Xconfig::xfree;
 use keyboard;
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
 use mouse;
 use modules::any_conf;
diff --git a/lib/Xconfig/main.pm b/lib/Xconfig/main.pm
index 55d88ba..9453204 100644
--- a/lib/Xconfig/main.pm
+++ b/lib/Xconfig/main.pm
@@ -11,6 +11,7 @@ use Xconfig::various;
 use Xconfig::screen;
 use Xconfig::test;
 use Xconfig::xfree;
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
 
 
diff --git a/lib/Xconfig/monitor.pm b/lib/Xconfig/monitor.pm
index f136e0a..838d14f 100644
--- a/lib/Xconfig/monitor.pm
+++ b/lib/Xconfig/monitor.pm
@@ -5,9 +5,11 @@ use strict;
 
 use Xconfig::xfree;
 use detect_devices;
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
 use any;
 use log;
+# perl_checker: require MDK::Common
 
 
 my @VertRefresh_ranges = ("50-70", "50-90", "50-100", "40-150");
diff --git a/lib/Xconfig/parse.pm b/lib/Xconfig/parse.pm
index 338a3c7..ebe467a 100644
--- a/lib/Xconfig/parse.pm
+++ b/lib/Xconfig/parse.pm
@@ -3,7 +3,9 @@ package Xconfig::parse; # $Id: parse.pm 247269 2008-10-01 13:57:30Z pixel $
 use diagnostics;
 use strict;
 
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
+# perl_checker: require MDK::Common
 
 
 sub read_XF86Config {
diff --git a/lib/Xconfig/plugins.pm b/lib/Xconfig/plugins.pm
index 620c2fe..635766f 100644
--- a/lib/Xconfig/plugins.pm
+++ b/lib/Xconfig/plugins.pm
@@ -5,7 +5,9 @@ use strict;
 
 use Xconfig::parse;
 use Xconfig::xfree;
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
+# perl_checker: require MDK::Common
 
 my $dir = '/usr/share/libDrakX/x11-plugins';
 
diff --git a/lib/Xconfig/proprietary.pm b/lib/Xconfig/proprietary.pm
index 44130fb..3fb43cc 100644
--- a/lib/Xconfig/proprietary.pm
+++ b/lib/Xconfig/proprietary.pm
@@ -3,8 +3,10 @@ package Xconfig::proprietary; # $Id: proprietary.pm 269741 2010-06-02 09:25:33Z
 use diagnostics;
 use strict;
 
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
 use Xconfig::card;
+# perl_checker: require MDK::Common
 
 my $lib = arch() =~ /x86_64/ ? "lib64" : "lib";
 my $libdir = "/usr/$lib";
diff --git a/lib/Xconfig/resolution_and_depth.pm b/lib/Xconfig/resolution_and_depth.pm
index 0bfb1e9..50b89a4 100644
--- a/lib/Xconfig/resolution_and_depth.pm
+++ b/lib/Xconfig/resolution_and_depth.pm
@@ -1,5 +1,6 @@
 package Xconfig::resolution_and_depth; # $Id: resolution_and_depth.pm 250289 2008-12-08 09:59:02Z pixel $
 
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use diagnostics;
 use strict;
 # perl_checker: require MDK::Common
diff --git a/lib/Xconfig/screen.pm b/lib/Xconfig/screen.pm
index 6855317..96fe9ce 100644
--- a/lib/Xconfig/screen.pm
+++ b/lib/Xconfig/screen.pm
@@ -5,6 +5,7 @@ use strict;
 
 use common;
 # perl_checker: require Xconfig::xfree
+# perl_checker: require MDK::Common
 
 sub configure {
     my ($raw_X) = @_; # perl_checker: $raw_X = Xconfig::xfree->new
diff --git a/lib/Xconfig/test.pm b/lib/Xconfig/test.pm
index ad8fe02..f0a0635 100644
--- a/lib/Xconfig/test.pm
+++ b/lib/Xconfig/test.pm
@@ -3,6 +3,7 @@ package Xconfig::test; # $Id: test.pm 252243 2009-01-29 17:57:45Z pixel $
 use diagnostics;
 use strict;
 
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use Xconfig::card;
 use run_program;
 use common;
diff --git a/lib/Xconfig/various.pm b/lib/Xconfig/various.pm
index c86439f..ed43386 100644
--- a/lib/Xconfig/various.pm
+++ b/lib/Xconfig/various.pm
@@ -6,6 +6,7 @@ use strict;
 use Xconfig::card;
 use Xconfig::default;
 use Xconfig::resolution_and_depth;
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
 
 
diff --git a/lib/Xconfig/xfree.pm b/lib/Xconfig/xfree.pm
index c235084..84bde8f 100644
--- a/lib/Xconfig/xfree.pm
+++ b/lib/Xconfig/xfree.pm
@@ -5,8 +5,10 @@ my ($Revision) = '$Revision: 262502 $' =~ /(\d+)/;
 use diagnostics;
 use strict;
 
+use lib qw(/usr/lib/libDrakX); # for perl_checker
 use common;
 use Xconfig::parse;
+# perl_checker: require MDK::Common
 
 #- mostly internal only
 sub new {
diff --git a/lib/keyboard.pm b/lib/keyboard.pm
index 8dbb27a..5065611 100644
--- a/lib/keyboard.pm
+++ b/lib/keyboard.pm
@@ -12,7 +12,7 @@ use run_program;
 use lang;
 use log;
 use c;
-
+# perl_checker: require MDK::Common
 
 #-######################################################################################
 #- Globals