Only export the ceil function from POSIX. By default, POSIX exports

everything, and this happens to generate warnings when using perl 5.10.0.
That's a perl bug, but we can still work around it and avoid potential
future issues of the same kind.


git-svn-id: http://lm-sensors.org/svn/lm-sensors/trunk@5389 7894878c-1315-0410-8ee3-d5d059ff63e0

2 files changed, 2 insertions, 1 deletions

diff --git a/CHANGES b/CHANGES
index 0b38c107..40ad5a4a 100644
--- a/CHANGES
+++ b/CHANGES
@@ -17,6 +17,7 @@ SVN-HEAD
   Module lm78: Prevent misdetection of Winbond chips
   Module lm90: Don't spam the kernel log (2.6 backport)
   Module max1619: Use inline functions instead of macros (2.6 backport)
+  Program decode-dimms.pl: Only export the ceil function from POSIX 
   Program pwmconfig: Fix MINSTOP and MINSTART test functions (#2340)
                      Change default for MINTEMP from 0 to 20 degrees C
   Program sensord: Add it8720 support
diff --git a/prog/eeprom/decode-dimms.pl b/prog/eeprom/decode-dimms.pl
index 2fed32d2..9e22f4dd 100755
--- a/prog/eeprom/decode-dimms.pl
+++ b/prog/eeprom/decode-dimms.pl
@@ -97,7 +97,7 @@
 require 5.004;
 
 use strict;
-use POSIX;
+use POSIX qw(ceil);
 use Fcntl qw(:DEFAULT :seek);
 use vars qw($opt_html $opt_body $opt_bodyonly $opt_igncheck $use_sysfs
 	    @vendors %decode_callback);