Changeset 250 for branches

Timestamp:

05/25/05 10:25:17 (20 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Fixed error message passback problem with allocating a piece of
a larger block. Errors should now return the local $@ error
as well as the generic error.

File:

• branches/stable/cgi-bin/IPDB.pm (modified) (1 diff)

branches/stable/cgi-bin/IPDB.pm

@@ -384 +384 @@
       }; # end eval
       if ($@) {
+        $msg .= ": ".$@;
         eval { $dbh->rollback; };
         return ('FAIL',$msg);