print error message for failed cancels!

diff --git a/httemplate/misc/cancel-unaudited.cgi b/httemplate/misc/cancel-unaudited.cgi
index 8f31db8..ecfaef2 100755 (executable)
--- a/httemplate/misc/cancel-unaudited.cgi
+++ b/httemplate/misc/cancel-unaudited.cgi
@@ -33,7 +33,7 @@ if ( $error ) {
   %>
 <!-- mason kludge -->
 <%
-  &eidiot(@_);
+  &eidiot($error);
 } else {
 
   $dbh->commit or die $dbh->errstr;