| Message ID | 1468002385-4407-26-git-send-email-ian.jackson@eu.citrix.com (mailing list archive) |
|---|---|
| State | New, archived |
| Headers | show |
diff --git a/tcl/JobDB-Executive.tcl b/tcl/JobDB-Executive.tcl index 6c7e067..8f4ed98 100644 --- a/tcl/JobDB-Executive.tcl +++ b/tcl/JobDB-Executive.tcl @@ -170,7 +170,7 @@ proc db--exec-check {shvar stmt expected_status body} { set emsg "osstest expected status $expected_status got $status" } set context [pg_result $sh -error context] - error $emsg \ + error "db exec failed ($status, $sqlstate) $emsg" \ " while executing SQL\n$stmt\n in SQL context\n$context" \ [list OSSTEST-PSQL $status $sqlstate] }
Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com> --- tcl/JobDB-Executive.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)