cosmetics to use directives

diff --git a/user_interface/pmt_ro.pm b/user_interface/pmt_ro.pm
index c195c5729548b0f8cca6d916f227b708364836cc..3fc5826d1da823f89717d1fc9af37addce23b221 100644 (file)
--- a/user_interface/pmt_ro.pm
+++ b/user_interface/pmt_ro.pm
@@ -3,14 +3,13 @@ package pmt_ro;
 
 use strict;
 use warnings;
-use Device::SerialPort;
 use Time::HiRes;
 use POSIX qw/strftime/;
 use POSIX;
-use CGI ':standard';
-use CGI::Carp qw(fatalsToBrowser);
+# use CGI ':standard';
+# use CGI::Carp qw(fatalsToBrowser);
 use Data::Dumper;
-use Pod::Usage;
+# use Pod::Usage;
 use FileHandle;
 use regio;
 # use manage_settings;

diff --git a/user_interface/regio.pm b/user_interface/regio.pm
index f46f01e8413fdb4c579d3125ca64169f71acbf04..2f2eb733145909c5e728600b28e55da3dba650ea 100644 (file)
--- a/user_interface/regio.pm
+++ b/user_interface/regio.pm
@@ -4,6 +4,7 @@
 
 package regio;
 
+use Device::SerialPort;
 
 =head1 NAME