Bugfix: allow the absence of default section in the config file.

diff --git a/lib/Net/IMAP/Sync.pm b/lib/Net/IMAP/Sync.pm
index be083f3f0facb474e9f6d6e648a632df47182ff1..c3af4fab017dcb522e749d9f5e3e13adb807ffeb 100644 (file)
--- a/lib/Net/IMAP/Sync.pm
+++ b/lib/Net/IMAP/Sync.pm
@@ -75,7 +75,7 @@ sub read_config($$%) {
 
     my %configs;
     foreach my $section (@$sections) {
-        my $conf = { %{$h->{_}} }; # default section
+        my $conf = defined $h->{_} ? { %{$h->{_}} } : {}; # default section
         $configs{$section} = $conf;
         next unless defined $section and $section ne '_';