[Rt-commit] r2810 - in rt/branches/QUEBEC-EXPERIMENTAL: . html/Ticket

[jesse at bestpractical.com]

Author: jesse
Date: Thu Apr 28 14:42:20 2005
New Revision: 2810

Modified:
   rt/branches/QUEBEC-EXPERIMENTAL/   (props changed)
   rt/branches/QUEBEC-EXPERIMENTAL/html/Ticket/Display.html
Log:
 r14611 at hualien:  jesse | 2005-04-28 14:40:11 -0400
 * Turned off redirect on submit for now


Modified: rt/branches/QUEBEC-EXPERIMENTAL/html/Ticket/Display.html
==============================================================================
--- rt/branches/QUEBEC-EXPERIMENTAL/html/Ticket/Display.html	(original)
+++ rt/branches/QUEBEC-EXPERIMENTAL/html/Ticket/Display.html	Thu Apr 28 14:42:20 2005
@@ -104,6 +104,7 @@
     unless ($TicketObj->CurrentUserHasRight('ShowTicket')) {
 	Abort("No permission to view newly created ticket #".$TicketObj->id.".");
 	}
+        $RT::Logger->crit("Just created the ticket");
     # }}}
 } else { 
     if (!$TicketObj) {
@@ -144,18 +145,32 @@
     push (@Actions, @BasicActions, @results);
 }
 
+# This code does automatic redirection if any updates happen. 
+# It doesn't work for the client.
+
+if (0) {
+
+
+$RT::Logger->crit("About to check for actions");
 if (@Actions) {
+    $RT::Logger->crit("We have actions. time to redirect"); 
     # We've done something, so we need to clear the decks to avoid 
     # resubmission on refresh.
     # But we need to store Actions somewhere too, so we don't lose them.
     $session{"Actions"} = \@Actions;
-    $m->redirect($RT::WebURL."/Ticket/Display.html?id=".$TicketObj->id);
+    $m->redirect($RT::WebPath."/Ticket/Display.html?id=".$TicketObj->id);
+    $RT::Logger->crit("Set up the redirect");
     $m->abort();
+    $RT::Logger->crit("Aborted. Should never be called");
 } else {
+    $RT::Logger->crit("We're not redirecting. load up some actions if they exist");
     @Actions = @{$session{"Actions"} || [] };
     delete $session{"Actions"};
 }
 
+$RT::Logger->crit("We're past the point where any redirect happens");
+
+}
 
 $m->comp('/Elements/Callback', _CallbackName => 'BeforeDisplay',
 	 TicketObj => \$TicketObj, Tickets => \$Tickets, ARGSRef => \%ARGS);