reduce the amount of POSIX loaded.

[spider.git] / perl / Sun.pm

diff --git a/perl/Sun.pm b/perl/Sun.pm
index 6b9b88eb4da0edf6dc59656e2b6af2a8d270d986..301fa4a5b862906b55409d8025c64ae3915afe36 100644 (file)
--- a/perl/Sun.pm
+++ b/perl/Sun.pm
@@ -26,7 +26,6 @@
 
 package Sun;
 
-use POSIX;
 
 require Exporter;
 @ISA = qw(Exporter);
@@ -50,6 +49,9 @@ use vars qw(%keps);
 use Keps;
 use DXVars;
 use DXUtil;
+use DXDebug;
+
+use POSIX qw(:math_h);
 
 # reload the keps data
 sub load