From 2c5ee3d876b665da306f7fcd7b47dcefc9051fbc Mon Sep 17 00:00:00 2001
From: Thomas von Dein <git@daemon.de>
Date: Sat, 10 Oct 2009 16:13:50 +0000
Subject: [PATCH]  1.27:   - "make test" complained about uninitialized value  
          in :146, which is now fixed.

git-svn-id: http://dev.catalyst.perl.org/repos/Config-General/trunk@15 be1acefe-a474-0410-9a34-9b3221f2030f
---
 Changelog  | 3 +++
 General.pm | 6 +++---
 README     | 2 +-
 3 files changed, 7 insertions(+), 4 deletions(-)

diff --git a/Changelog b/Changelog
index 6d8b1c2..61ee7e1 100644
--- a/Changelog
+++ b/Changelog
@@ -1,3 +1,6 @@
+ 1.27:   - "make test" complained about uninitialized value
+           in :146, which is now fixed.
+
  1.26:   - added filehandle capability to -file.
          - added -String parameter to new(), which allows
            one to supply the whole config as a string.
diff --git a/General.pm b/General.pm
index 05c44a5..f9bfae3 100644
--- a/General.pm
+++ b/General.pm
@@ -17,7 +17,7 @@ use FileHandle;
 use strict;
 use Carp;
 
-$Config::General::VERSION = "1.26";
+$Config::General::VERSION = "1.27";
 
 sub new {
   #
@@ -143,7 +143,7 @@ sub _read {
   my(@stuff, @content, $c_comment, $longline, $hier, $hierend, @hierdoc);
   local $_;
 
-  if ($flag eq "SCALAR") {
+  if ($flag && $flag eq "SCALAR") {
     if (ref($fh) eq "ARRAY") {
       @stuff = @{$fh};
     }
@@ -1011,7 +1011,7 @@ Thomas Linden <tom@daemon.de>
 
 =head1 VERSION
 
-1.26
+1.27
 
 =cut
 
diff --git a/README b/README
index 08879c1..82d76cd 100644
--- a/README
+++ b/README
@@ -59,4 +59,4 @@ AUTHOR
 
 
 VERSION
-	1.26
+	1.27