1.32 - *argl* ... I forgot Interpolated.pm, don't know how that

could happen, in 1.29 it was "lost". However - 
	   I added it again now.
	 - added patch by Peder Stray <peder@linpro.no> to
	   the _store() method, which makes it possible to catch
	   arrays of hashes to be stored correctly.
	 - cleaned up the t/run.t testscript to reflect the
	   changes (in fact I did not touch it since 1.18 or so).
	 - added test number 16 to test variable interpolation
	   using ::Interpolated in t/run.t.
	 - fixed bug with new() parameter -AllowMultiOptions which
	   generated a croak() if set to something other than "no".
	 - changed Extended::save() to reflect the API change,
	   it calls now save_file(). 


git-svn-id: http://dev.catalyst.perl.org/repos/Config-General/trunk@21 be1acefe-a474-0410-9a34-9b3221f2030f
This commit is contained in:
Thomas von Dein
2009-10-10 16:17:24 +00:00
parent f860be0f71
commit f9c0a5a8f3
7 changed files with 94 additions and 23 deletions

View File

@@ -22,7 +22,7 @@ use vars qw(@ISA);
use strict;
$Config::General::Extended::VERSION = "1.2";
$Config::General::Extended::VERSION = "1.3";
sub obj {
@@ -172,8 +172,8 @@ sub save {
if (!$file) {
$file = $this->{configfile};
}
open $fh, ">$file" or croak "Could not open $file!($!)\n";
$this->_store($fh, 0,%{$this->{config}});
$this->save_file($file);
}
@@ -287,7 +287,9 @@ Writes the current config hash back to the harddisk.
It takes an optional argument: B<filename>. If you omit a filename, save() will
use the filename configured by the method B<configfile()> or B<new()> (see below).
B<Important>: the method save() is now superseded by B<save_file()> and B<save_string()>.
Refer to L<Config::General> for details. You can use these new methods to save
a config either to a string or to a file.
=item configfile('filename')
@@ -474,7 +476,7 @@ values under the given key will be overwritten.
=head1 COPYRIGHT
Copyright (c) 2000-2001 Thomas Linden
Copyright (c) 2000-2002 Thomas Linden
This library is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.
@@ -492,7 +494,7 @@ Thomas Linden <tom@daemon.de>
=head1 VERSION
1.1
1.3
=cut