Index: /branches/release-38/lib/MT/App.pm
===================================================================
--- /branches/release-38/lib/MT/App.pm (revision 2365)
+++ /branches/release-38/lib/MT/App.pm (revision 2391)
@@ -2061,4 +2061,7 @@
         REQUEST:
         {
+            # for Perl 5.6.x BugId:79755
+            $mode = $app->{forward} unless $mode;
+
             my $requires_login = $app->{requires_login};