[Rt-commit] r7073 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Mon Feb 26 09:42:46 2007
New Revision: 7073

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/html/REST/1.0/Forms/ticket/default

Log:
 r4602 at cubic-pc (orig r7038):  ruz | 2007-02-20 17:42:49 +0300
  r4596 at cubic-pc (orig r7031):  ruz | 2007-02-19 11:48:57 +0300
  * better error propagation, thanks to Pholip Kime.
 


Modified: rt/branches/3.7-EXPERIMENTAL/html/REST/1.0/Forms/ticket/default
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/html/REST/1.0/Forms/ticket/default	(original)
+++ rt/branches/3.7-EXPERIMENTAL/html/REST/1.0/Forms/ticket/default	Mon Feb 26 09:42:46 2007
@@ -157,9 +157,11 @@
                 );
         }
 
-        $ticket->Create(%v);
-        unless ($ticket->Id) {
-            return [ "# Could not create ticket.", [], {}, 1 ];
+        my($tid,$trid,$terr) = $ticket->Create(%v);    
+        unless ($tid) {
+            push(@comments, "# Could not create ticket.");
+            push(@comments, "# " . $terr);
+            goto DONE;
         }
 
         delete $data{id};