From ef6126352e87002be24ecae8b90e07d7632b25ea Mon Sep 17 00:00:00 2001
From: Thomas von Dein <git@daemon.de>
Date: Sat, 10 Oct 2009 16:28:36 +0000
Subject: [PATCH]  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
---
 Changelog  | 4 ++++
 General.pm | 8 ++++----
 README     | 2 +-
 3 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/Changelog b/Changelog
index 8e3b681..1d9d555 100644
--- a/Changelog
+++ b/Changelog
@@ -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
diff --git a/General.pm b/General.pm
index da65c2b..1fb83c6 100644
--- a/General.pm
+++ b/General.pm
@@ -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
 
diff --git a/README b/README
index 98249ef..cca9542 100644
--- a/README
+++ b/README
@@ -104,4 +104,4 @@ AUTHOR
 
 
 VERSION
-	2.20
+	2.21