r38982 - in /branches/upstream/libconfig-model-perl/current: ChangeLog META.yml lib/Config/Model.pm lib/Config/Model/WarpedNode.pm t/dump_tree.t
ddumont-guest at users.alioth.debian.org
ddumont-guest at users.alioth.debian.org
Tue Jun 30 11:40:14 UTC 2009
Author: ddumont-guest
Date: Tue Jun 30 11:39:44 2009
New Revision: 38982
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=38982
Log:
[svn-upgrade] Integrating new upstream version, libconfig-model-perl (0.638)
Modified:
branches/upstream/libconfig-model-perl/current/ChangeLog
branches/upstream/libconfig-model-perl/current/META.yml
branches/upstream/libconfig-model-perl/current/lib/Config/Model.pm
branches/upstream/libconfig-model-perl/current/lib/Config/Model/WarpedNode.pm
branches/upstream/libconfig-model-perl/current/t/dump_tree.t
Modified: branches/upstream/libconfig-model-perl/current/ChangeLog
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-model-perl/current/ChangeLog?rev=38982&op=diff
==============================================================================
--- branches/upstream/libconfig-model-perl/current/ChangeLog (original)
+++ branches/upstream/libconfig-model-perl/current/ChangeLog Tue Jun 30 11:39:44 2009
@@ -1,3 +1,9 @@
+2009-06-29 Dominique Dumont <dominique.dumont at hp.com> v0.638
+
+ * lib/Config/Model/WarpedNode.pm (is_auto_write_for_type): Added
+ new method that need to be forwarded to Node to avoid write
+ cds_file bug.
+
2009-06-23 Dominique Dumont <dominique.dumont at hp.com> v0.637
* lib/Config/Model/Value.pm: As suggested by Jonas Smedegaard,
Modified: branches/upstream/libconfig-model-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-model-perl/current/META.yml?rev=38982&op=diff
==============================================================================
--- branches/upstream/libconfig-model-perl/current/META.yml (original)
+++ branches/upstream/libconfig-model-perl/current/META.yml Tue Jun 30 11:39:44 2009
@@ -1,6 +1,6 @@
---
name: Config-Model
-version: 0.637
+version: 0.638
author:
- Dominique Dumont (ddumont at cpan dot org)
abstract: Edit and validate configuration data
@@ -25,7 +25,7 @@
provides:
Config::Model:
file: lib/Config/Model.pm
- version: 0.637
+ version: 0.638
Config::Model::AnyId:
file: lib/Config/Model/AnyId.pm
version: 1.0914
@@ -113,7 +113,7 @@
version: 1.0905
Config::Model::WarpedNode:
file: lib/Config/Model/WarpedNode.pm
- version: 1.0814
+ version: 1.0993
Config::Model::WarpedThing:
file: lib/Config/Model/WarpedThing.pm
version: 1.0729
Modified: branches/upstream/libconfig-model-perl/current/lib/Config/Model.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-model-perl/current/lib/Config/Model.pm?rev=38982&op=diff
==============================================================================
--- branches/upstream/libconfig-model-perl/current/lib/Config/Model.pm (original)
+++ branches/upstream/libconfig-model-perl/current/lib/Config/Model.pm Tue Jun 30 11:39:44 2009
@@ -1,6 +1,6 @@
# $Author: ddumont $
-# $Date: 2009-06-22 14:02:02 +0200 (Mon, 22 Jun 2009) $
-# $Revision: 978 $
+# $Date: 2009-06-29 14:17:40 +0200 (Mon, 29 Jun 2009) $
+# $Revision: 993 $
# Copyright (c) 2005-2009 Dominique Dumont.
#
@@ -36,7 +36,7 @@
# this class holds the version number of the package
use vars qw($VERSION @status @level @experience_list %experience_index) ;
-$VERSION = '0.637';
+$VERSION = '0.638';
=head1 NAME
Modified: branches/upstream/libconfig-model-perl/current/lib/Config/Model/WarpedNode.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-model-perl/current/lib/Config/Model/WarpedNode.pm?rev=38982&op=diff
==============================================================================
--- branches/upstream/libconfig-model-perl/current/lib/Config/Model/WarpedNode.pm (original)
+++ branches/upstream/libconfig-model-perl/current/lib/Config/Model/WarpedNode.pm Tue Jun 30 11:39:44 2009
@@ -1,6 +1,6 @@
# $Author: ddumont $
-# $Date: 2008-12-16 14:18:45 +0100 (Tue, 16 Dec 2008) $
-# $Revision: 814 $
+# $Date: 2009-06-29 14:17:40 +0200 (Mon, 29 Jun 2009) $
+# $Revision: 993 $
# Copyright (c) 2005-2007 Dominique Dumont.
#
@@ -32,7 +32,7 @@
use Data::Dumper ();
use vars qw($VERSION $AUTOLOAD) ;
-$VERSION = sprintf "1.%04d", q$Revision: 814 $ =~ /(\d+)/;
+$VERSION = sprintf "1.%04d", q$Revision: 993 $ =~ /(\d+)/;
=head1 NAME
@@ -393,6 +393,11 @@
$self->get_actual_node->load_data($h) ;
+}
+
+sub is_auto_write_for_type {
+ my $self = shift ;
+ $self->get_actual_node->is_auto_write_for_type(@_) ;
}
1;
Modified: branches/upstream/libconfig-model-perl/current/t/dump_tree.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libconfig-model-perl/current/t/dump_tree.t?rev=38982&op=diff
==============================================================================
--- branches/upstream/libconfig-model-perl/current/t/dump_tree.t (original)
+++ branches/upstream/libconfig-model-perl/current/t/dump_tree.t Tue Jun 30 11:39:44 2009
@@ -1,7 +1,7 @@
# -*- cperl -*-
# $Author: ddumont $
-# $Date: 2009-03-05 13:54:24 +0100 (Thu, 05 Mar 2009) $
-# $Revision: 873 $
+# $Date: 2009-06-29 14:17:40 +0200 (Mon, 29 Jun 2009) $
+# $Revision: 993 $
use ExtUtils::testlib;
use Test::More tests => 13;
@@ -218,7 +218,7 @@
my $tm = $root -> fetch_element('tree_macro') ;
map { $tm->store($_);} qw/XY XZ mXY XY mXY XZ/;
-$cds = $root->dump_tree( full_dump => 1 );
+$cds = $root->dump_tree( full_dump => 1 ,skip_auto_write => 'cds_file');
print "cds string:\n$cds" if $trace ;
like($cds,qr/hidden value/,"check that hidden value is shown (macro=XZ)") ;
More information about the Pkg-perl-cvs-commits
mailing list