r40266 - in /branches/upstream/libconfig-augeas-perl/current: Build.PL ChangeLog META.yml lib/Config/Augeas.pm lib/Config/Augeas.xs t/Config-Augeas.t t/Config-AugeasC.t
ddumont-guest at users.alioth.debian.org
ddumont-guest at users.alioth.debian.org
Mon Jul 20 11:33:50 UTC 2009
Author: ddumont-guest
Date: Mon Jul 20 11:33:45 2009
New Revision: 40266
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=40266
Log:
[svn-upgrade] Integrating new upstream version, libconfig-augeas-perl (0.501)
Modified:
branches/upstream/libconfig-augeas-perl/current/Build.PL
branches/upstream/libconfig-augeas-perl/current/ChangeLog
branches/upstream/libconfig-augeas-perl/current/META.yml
branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.pm
branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.xs
branches/upstream/libconfig-augeas-perl/current/t/Config-Augeas.t
branches/upstream/libconfig-augeas-perl/current/t/Config-AugeasC.t
Modified: branches/upstream/libconfig-augeas-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-augeas-perl/current/Build.PL?rev=40266&op=diff
==============================================================================
--- branches/upstream/libconfig-augeas-perl/current/Build.PL (original)
+++ branches/upstream/libconfig-augeas-perl/current/Build.PL Mon Jul 20 11:33:45 2009
@@ -1,4 +1,4 @@
-# Copyright (c) 2008 Dominique Dumont.
+# Copyright (c) 2008-2009 Dominique Dumont.
#
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser Public License as
@@ -76,7 +76,7 @@
dist_abstract => "Edit configuration files through Augeas C library",
dynamic_config => 1,
- extra_compiler_flags => $aug_cflags,
+ extra_compiler_flags => $aug_cflags . ' -Wall -Wformat -Werror=format-security',
extra_linker_flags => $aug_libs,
build_requires => {
Modified: branches/upstream/libconfig-augeas-perl/current/ChangeLog
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-augeas-perl/current/ChangeLog?rev=40266&op=diff
==============================================================================
--- branches/upstream/libconfig-augeas-perl/current/ChangeLog (original)
+++ branches/upstream/libconfig-augeas-perl/current/ChangeLog Mon Jul 20 11:33:45 2009
@@ -1,3 +1,11 @@
+2009-07-10 Dominique Dumont <dominique.dumont at hp.com> v0.501
+
+ * Build.PL: modified gcc options to issue more warnings (and fixed
+ them
+
+ * lib/Config/Augeas.xs: Fixed compiler warnings (Thanks to
+ Guillaume Rousse)
+
2009-05-27 Dominique Dumont <dominique.dumont at hp.com> v 0.500
* lib/Config/Augeas.pm (new): added no_load, save => noop,
Modified: branches/upstream/libconfig-augeas-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-augeas-perl/current/META.yml?rev=40266&op=diff
==============================================================================
--- branches/upstream/libconfig-augeas-perl/current/META.yml (original)
+++ branches/upstream/libconfig-augeas-perl/current/META.yml Mon Jul 20 11:33:45 2009
@@ -1,6 +1,6 @@
---
name: Config-Augeas
-version: 0.500
+version: 0.501
author:
- Dominique Dumont (ddumont at cpan dot org)
abstract: Edit configuration files through Augeas C library
@@ -13,7 +13,7 @@
provides:
Config::Augeas:
file: lib/Config/Augeas.pm
- version: 0.500
+ version: 0.501
generated_by: Module::Build version 0.33
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
Modified: branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.pm?rev=40266&op=diff
==============================================================================
--- branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.pm (original)
+++ branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.pm Mon Jul 20 11:33:45 2009
@@ -22,7 +22,7 @@
use Carp;
use IO::File ;
-our $VERSION = '0.500';
+our $VERSION = '0.501';
require XSLoader;
XSLoader::load('Config::Augeas', $VERSION);
Modified: branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.xs
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.xs?rev=40266&op=diff
==============================================================================
--- branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.xs (original)
+++ branches/upstream/libconfig-augeas-perl/current/lib/Config/Augeas.xs Mon Jul 20 11:33:45 2009
@@ -74,13 +74,13 @@
const char* expr
# returns an array ( return value, created )
-int
+void
aug_defnode(aug, name, expr, value)
Config_Augeas* aug
const char* name
const char* expr
const char* value
- INIT:
+ PREINIT:
int created ;
int ret ;
PPCODE:
@@ -152,7 +152,7 @@
if (strlen(die_msg) + strlen(tmp_msg) < 1024 )
strcat(die_msg,tmp_msg);
}
- croak (die_msg);
+ croak ("%s",die_msg);
}
// printf("match: Pattern %s matches %d times\n", pattern, cnt);
Modified: branches/upstream/libconfig-augeas-perl/current/t/Config-Augeas.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-augeas-perl/current/t/Config-Augeas.t?rev=40266&op=diff
==============================================================================
--- branches/upstream/libconfig-augeas-perl/current/t/Config-Augeas.t (original)
+++ branches/upstream/libconfig-augeas-perl/current/t/Config-Augeas.t Mon Jul 20 11:33:45 2009
@@ -20,10 +20,18 @@
# cleanup before tests
rmtree($aug_root);
-mkpath($aug_root.'etc/ssh/', { mode => 0755 }) ;
-copy($r_root.'etc/hosts',$aug_root.'etc/') ;
-copy($r_root.'etc/ssh/sshd_config',$aug_root.'etc/ssh/') ;
+mkpath($aug_root.'etc/ssh/', { mode => 0755 }) || die "Can't mkpath:$!";
+copy($r_root.'etc/hosts',$aug_root.'etc/') || die "Can't copy etc/hosts:$!";
+copy($r_root.'etc/ssh/sshd_config',$aug_root.'etc/ssh/')
+ || die "Can't copy etc/ssh/sshd_config:$!" ;
+
+# check that files were written
+foreach my $f (qw!hosts ssh/sshd_config!) {
+ my $testfile = $aug_root."etc/$f" ;
+ next if -r $testfile ;
+ die "Cannot test: file $testfile was not written";
+}
my $written_file = $aug_root."etc/hosts.augnew" ;
unlink ($written_file) if -e $written_file ;
Modified: branches/upstream/libconfig-augeas-perl/current/t/Config-AugeasC.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-augeas-perl/current/t/Config-AugeasC.t?rev=40266&op=diff
==============================================================================
--- branches/upstream/libconfig-augeas-perl/current/t/Config-AugeasC.t (original)
+++ branches/upstream/libconfig-augeas-perl/current/t/Config-AugeasC.t Mon Jul 20 11:33:45 2009
@@ -51,9 +51,16 @@
sub cleanup {
# cleanup before tests
rmtree($aug_root);
- mkpath($aug_root.'etc/ssh/', { mode => 0755 }) ;
- copy($r_root.'etc/hosts',$aug_root.'etc/') ;
- copy($r_root.'etc/ssh/sshd_config',$aug_root.'etc/ssh/') ;
+ mkpath($aug_root.'etc/ssh/', { mode => 0755 }) || die "Can't mkpath:$!" ;
+ copy($r_root.'etc/hosts',$aug_root.'etc/') || die "Can't copy etc/hosts:$!";
+ copy($r_root.'etc/ssh/sshd_config',$aug_root.'etc/ssh/')
+ || die "Can't copy etc/ssh/sshd_config:$!" ;
+
+ foreach my $f (qw!hosts ssh/sshd_config!) {
+ my $testfile = $aug_root."etc/$f" ;
+ next if -r $testfile ;
+ die "Cannot test: file $testfile was not written";
+ }
}
# test augeas without backup file
More information about the Pkg-perl-cvs-commits
mailing list