provide better diagnostics on PAUSE config file error

rjbs · Aug 8, 2015 · 577d436 · 577d436
1 parent 37b00ff
commit 577d436
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/lib/Dist/Zilla/Plugin/UploadToCPAN.pm b/lib/Dist/Zilla/Plugin/UploadToCPAN.pm
@@ -175,9 +175,11 @@ has pause_cfg => (
     my $file = $self->pause_cfg_file;
     $file = File::Spec->catfile($self->pause_cfg_dir, $file)
       unless File::Spec->file_name_is_absolute($file);
+    return {} unless -e $file && -r _;
     my $cfg = try {
       CPAN::Uploader->read_config_file($file)
     } catch {
+      $self->log("Couldn't load credentials from '$file': $_");
       {};
     };
     return $cfg;