diff --git a/Supporters/lib/Supporters.pm b/Supporters/lib/Supporters.pm index b18f947..16b18ca 100644 --- a/Supporters/lib/Supporters.pm +++ b/Supporters/lib/Supporters.pm @@ -1077,7 +1077,7 @@ Returns: scalar boolean, which is true iff. the $id is valid and already in the sub _verifyId($$) { my($self, $id) = @_; - die "_verifyId() called with a non-numeric id" unless defined $id and looks_like_number($id); + confess "_verifyId(): called with a non-numeric id" unless defined $id and looks_like_number($id); my $val = $self->dbh()->selectall_hashref("SELECT id FROM donor WHERE id = " . $self->dbh->quote($id, 'SQL_INTEGER'), 'id');