Be more robust towards Sheets API errors; for instance, if the sheet does not exist.

[skvidarsync] / bin / sync.pl

diff --git a/bin/sync.pl b/bin/sync.pl
index b12125b1a295e2b733929844bec4bd7878f091ba..2d315c9d2a646f7448d82b03db5f65b946f02ff4 100644 (file)
--- a/bin/sync.pl
+++ b/bin/sync.pl
@@ -579,6 +579,9 @@ sub run {
        log_timing($start, "/spreadsheets/");
 
        my $sheets_json = JSON::XS::decode_json($response->decoded_content);
+       if (!exists($sheets_json->{'sheets'})) {
+               die "Missing sheets (error response?): " . $response->decoded_content;
+       }
        my $main_sheet_json = $sheets_json->{'sheets'}[0];
        my $mapping_sheet_json = $sheets_json->{'sheets'}[1];