From fa12743390bf21937492cfb6a92a5bc6a21ac800 Mon Sep 17 00:00:00 2001
From: "H.Merijn Brand" <h.m.brand@xs4all.nl>
Date: Wed, 20 May 2009 10:12:59 +0200
Subject: [PATCH] Default for summary is myconfig

---
 Changelog | 4 ++++
 V.pm      | 9 +++++----
 2 files changed, 9 insertions(+), 4 deletions(-)

diff --git a/Changelog b/Changelog
index 88da166..6bbf40b 100644
--- a/Changelog
+++ b/Changelog
@@ -1,3 +1,7 @@
+0.04	- 20 May 2009, H.Merijn Brand
+
+    - Default for summary is myconfig
+
 0.03	- 05 Apr 2009, H.Merijn Brand
 
     - Reconstruct version from perl-v output (dagolden)
diff --git a/V.pm b/V.pm
index 7ae35d0..eec730b 100644
--- a/V.pm
+++ b/V.pm
@@ -5,7 +5,7 @@ package Config::Perl::V;
 use strict;
 use warnings;
 
-our $VERSION = "0.03";
+our $VERSION = "0.04";
 
 use Config;
 
@@ -227,7 +227,7 @@ sub plv2hash
 
 sub summary
 {
-    my $conf = shift;
+    my $conf = shift || myconfig ();
     ref $conf eq "HASH" &&
 	exists $conf->{config} && exists $conf->{build} or return;
 
@@ -313,9 +313,10 @@ known when the C<-V> information is collected.
 Convert a sole 'perl -V' text block, or list of lines, to a complete
 myconfig hash.  All unknown entries are defaulted.
 
-=head2 $info = summary ($conf)
+=head2 $info = summary ([$conf])
 
-Return an arbitrary selection of the information.
+Return an arbitrary selection of the information. If no C<$conf> is
+given, C<myconfig ()> is used instead.
 
 =head2 The hash structure
 
-- 
2.11.4.GIT