From: Vincent Pit <vince@profvince.com>
Date: Sun, 29 Jun 2008 16:41:31 +0000 (+0200)
Subject: Importing Linux-SysInfo-0.08.tar.gz
X-Git-Tag: v0.08^0
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLinux-SysInfo.git;a=commitdiff_plain;h=2bb07e3d56530a3d96f3b1dcfa3ee52cec5c114c

Importing Linux-SysInfo-0.08.tar.gz
---

diff --git a/Changes b/Changes
index 7939405..b67e711 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for Linux-SysInfo
 
+0.08    2007-11-19 09:25 UTC
+        + Fix : 5.10.0_RC1 compatibility fix.
+
 0.07    2007-08-28 12:30 UTC
         + Chg : s/require (XSLoader)/use $1/.
         + Fix : Tests are now strict.
diff --git a/META.yml b/META.yml
index 22e761f..78776cd 100644
--- a/META.yml
+++ b/META.yml
@@ -1,9 +1,9 @@
 --- #YAML:1.0
 name:                Linux-SysInfo
-version:             0.07
+version:             0.08
 abstract:            Perl interface to the sysinfo(2) Linux system call.
 license:             perl
-generated_by:        ExtUtils::MakeMaker version 6.36
+generated_by:        ExtUtils::MakeMaker version 6.36_01
 distribution_type:   module
 requires:     
     Exporter:                      0
diff --git a/README b/README
index 1095de6..9e6ffd6 100644
--- a/README
+++ b/README
@@ -2,7 +2,7 @@ NAME
     Linux::SysInfo - Perl interface to the sysinfo(2) Linux system call.
 
 VERSION
-    Version 0.07
+    Version 0.08
 
 SYNOPSIS
         use Linux::SysInfo qw/sysinfo/;
diff --git a/SysInfo.xs b/SysInfo.xs
index 94cdf97..6ec169d 100644
--- a/SysInfo.xs
+++ b/SysInfo.xs
@@ -32,7 +32,7 @@
 # define LS_KEY_STORE(H,K,V) hv_store((H), LS_KEY(K), sizeof(#K)-1, \
                                       (V), LS_HASH(K))
 #else
-# if PERL_REVISION >= 5 && PERL_VERSION >= 9 && PERL_SUBVERSION >= 3
+# if PERL_REVISION > 5 || (PERL_REVISION == 5 && (PERL_VERSION > 9 || (PERL_VERSION == 9 && PERL_SUBVERSION >= 3)))
 /* From perl-5.9.3 (#24802), the key is only a SVt_PV and one can get the hash
  * value with the SvSHARED_HASH() macro. */
 #  define LS_HASH(K)         SvSHARED_HASH(LS_KEY(K))
diff --git a/lib/Linux/SysInfo.pm b/lib/Linux/SysInfo.pm
index 98f991d..dcbe1a9 100644
--- a/lib/Linux/SysInfo.pm
+++ b/lib/Linux/SysInfo.pm
@@ -9,11 +9,11 @@ Linux::SysInfo - Perl interface to the sysinfo(2) Linux system call.
 
 =head1 VERSION
 
-Version 0.07
+Version 0.08
 
 =cut
 
-our $VERSION = '0.07';
+our $VERSION = '0.08';
 
 =head1 SYNOPSIS
 
diff --git a/samples/sysinfo.pl b/samples/sysinfo.pl
index 2ca2f90..a0d860b 100755
--- a/samples/sysinfo.pl
+++ b/samples/sysinfo.pl
@@ -3,6 +3,8 @@
 use strict;
 use warnings;
 
+use lib qw{blib/lib blib/arch};
+
 use Linux::SysInfo qw/sysinfo LS_HAS_EXTENDED/;
 
 my $si = sysinfo;