From: Vincent Pit 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/?a=commitdiff_plain;h=2bb07e3d56530a3d96f3b1dcfa3ee52cec5c114c;p=perl%2Fmodules%2FLinux-SysInfo.git 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;