diff --git a/Supporters/lib/Supporters.pm b/Supporters/lib/Supporters.pm index 5e0ef5c..cace8d4 100644 --- a/Supporters/lib/Supporters.pm +++ b/Supporters/lib/Supporters.pm @@ -2006,7 +2006,7 @@ sub _readLedgerData($) { $type = 'Monthly'; } } - die "Unknown type $type for $entityId from $line" if $type !~ /^(Monthly|Annual)$/ and defined $self->{programTypeSearch}; + die "Unknown type \"$type\" for $entityId from $line" if $type !~ /^(Monthly|Annual)$/ and defined $self->{programTypeSearch}; $amount =~ s/,//; $amount = abs($amount); if (defined $amountTable{$entityId}{donations}{$date}) { $amountTable{$entityId}{donations}{$date} += $amount;