--- lm_sensors-2.8.0/prog/detect/sensors-detect.utf8 2003-07-08 15:07:59.000000000 +0200 +++ lm_sensors-2.8.0/prog/detect/sensors-detect 2003-07-23 12:40:03.000000000 +0200 @@ -1394,7 +1394,7 @@ "*** Terminating.\n"; exit(-1); } - my $towrite = pack "C", $_[1]; + my $towrite = pack "C", ($_[1] & 0xff); sysseek IOPORTS, $_[0], 0 or return -1; my $nrchars = syswrite IOPORTS, $towrite, 1; return -1 if not defined $nrchars or $nrchars != 1;