[Rt-commit] r12535 - in rt/branches/3.8-TESTING: .

[sartak at bestpractical.com]

Author: sartak
Date: Mon May 19 13:13:05 2008
New Revision: 12535

Modified:
   rt/branches/3.8-TESTING/   (props changed)
   rt/branches/3.8-TESTING/share/html/Dashboards/index.html

Log:
 r56360 at onn:  sartak | 2008-05-19 13:12:53 -0400
 Report dashboard name instead of ID in unsubscribe


Modified: rt/branches/3.8-TESTING/share/html/Dashboards/index.html
==============================================================================
--- rt/branches/3.8-TESTING/share/html/Dashboards/index.html	(original)
+++ rt/branches/3.8-TESTING/share/html/Dashboards/index.html	Mon May 19 13:13:05 2008
@@ -50,10 +50,7 @@
     current_subtab => 'Dashboards/index.html',
     Title => $title &>
 
-<& /Elements/ListActions,
-    actions => $Unsubscribe
-             ? [loc("Unsubscribed to dashboard [_1]", $Unsubscribe)]
-             : [] &>
+<& /Elements/ListActions, actions => \@actions &>
 
 <& /Dashboards/Elements/ShowDashboards,
     Type       => "Personal",
@@ -95,6 +92,19 @@
         }
     }
 }
+
+my @actions;
+if (defined $Unsubscribe) {
+    my $Dashboard = RT::Dashboard->new($session{'CurrentUser'});
+    $Dashboard->LoadById($Unsubscribe);
+    if ($Dashboard->Id) {
+        push @actions, loc("Unsubscribed to dashboard [_1]", $Dashboard->Name);
+    }
+    else {
+        push @actions, loc("Unable to unsubscribe to dashboard [_1]", $Unsubscribe);
+    }
+}
+
 </%INIT>
 <%ARGS>
 $Unsubscribe => undef