mirror of
https://codeberg.org/scip/Config-General.git
synced 2025-12-16 20:21:01 +01:00
2.21
- fixed bug in new() used $this instead of $self for empty hashref creation if no config file given. git-svn-id: http://dev.catalyst.perl.org/repos/Config-General/trunk@47 be1acefe-a474-0410-9a34-9b3221f2030f
This commit is contained in:
@@ -1,3 +1,7 @@
|
||||
2.21
|
||||
- fixed bug in new() used $this instead of $self for empty
|
||||
hashref creation if no config file given.
|
||||
|
||||
2.20
|
||||
- fixed bug reported by Stefano di Sandro <stedis@ulis.it>: in
|
||||
OOP mode (extended access) the obj() method returned the whole
|
||||
|
||||
@@ -5,7 +5,7 @@
|
||||
# config values from a given file and
|
||||
# return it as hash structure
|
||||
#
|
||||
# Copyright (c) 2000-2002 Thomas Linden <tom@daemon.de>.
|
||||
# Copyright (c) 2000-2003 Thomas Linden <tom@daemon.de>.
|
||||
# All Rights Reserved. Std. disclaimer applies.
|
||||
# Artificial License, same as perl itself. Have fun.
|
||||
#
|
||||
@@ -18,7 +18,7 @@ use strict;
|
||||
use Carp;
|
||||
use Exporter;
|
||||
|
||||
$Config::General::VERSION = "2.20";
|
||||
$Config::General::VERSION = "2.21";
|
||||
|
||||
use vars qw(@ISA @EXPORT);
|
||||
@ISA = qw(Exporter);
|
||||
@@ -256,7 +256,7 @@ sub new {
|
||||
}
|
||||
else {
|
||||
# hm, no valid config file given, so try it as an empty object
|
||||
$self->{config} = $this->_hashref();
|
||||
$self->{config} = $self->_hashref();
|
||||
$self->{parsed} = 1;
|
||||
}
|
||||
}
|
||||
@@ -1928,7 +1928,7 @@ Thomas Linden <tom@daemon.de>
|
||||
|
||||
=head1 VERSION
|
||||
|
||||
2.20
|
||||
2.21
|
||||
|
||||
=cut
|
||||
|
||||
|
||||
Reference in New Issue
Block a user