summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rwxr-xr-xlib/Travelynx.pm24
1 files changed, 20 insertions, 4 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm
index 039ab6e..7c89b04 100755
--- a/lib/Travelynx.pm
+++ b/lib/Travelynx.pm
@@ -582,7 +582,11 @@ qq{select * from pending_mails where email = ? and num_tries > 1;}
return ( $train, undef );
}
else {
- return ( undef, 'INSERT failed' );
+ my $uid = $self->current_user->{id};
+ my $err = $self->app->action_query->errstr;
+ $self->app->log->error(
+ "Checkin($uid, $action_id): INSERT failed: $err");
+ return ( undef, 'INSERT failed: ' . $err );
}
}
}
@@ -617,7 +621,10 @@ qq{select * from pending_mails where email = ? and num_tries > 1;}
return;
}
else {
- return 'INSERT failed';
+ my $uid = $self->current_user->{id};
+ my $err = $self->app->action_query->errstr;
+ $self->app->log->error("Undo($uid): INSERT failed: $err");
+ return 'INSERT failed: ' . $err;
}
}
);
@@ -658,7 +665,12 @@ qq{select * from pending_mails where email = ? and num_tries > 1;}
return;
}
else {
- return 'INSERT failed';
+ my $uid = $self->current_user->{id};
+ my $err = $self->app->action_query->errstr;
+ $self->app->log->error(
+"Force checkout($uid, $action_id): INSERT failed: $err"
+ );
+ return 'INSERT failed: ' . $err;
}
}
else {
@@ -695,7 +707,11 @@ qq{select * from pending_mails where email = ? and num_tries > 1;}
return;
}
else {
- return 'INSERT failed';
+ my $uid = $self->current_user->{id};
+ my $err = $self->app->action_query->errstr;
+ $self->app->log->error(
+ "Checkout($uid, $action_id): INSERT failed: $err");
+ return 'INSERT failed: ' . $err;
}
}
}