[Bps-public-commit] r20204 - RT-Extension-rt_cpan_org/html/Callbacks/rt_cpan_org/Ticket/Elements/Tabs

ruz at bestpractical.com ruz at bestpractical.com
Fri Dec 11 04:52:07 EST 2009


Author: ruz
Date: Fri Dec 11 04:52:06 2009
New Revision: 20204

Modified:
   RT-Extension-rt_cpan_org/html/Callbacks/rt_cpan_org/Ticket/Elements/Tabs/Default

Log:
* uninit warnings

Modified: RT-Extension-rt_cpan_org/html/Callbacks/rt_cpan_org/Ticket/Elements/Tabs/Default
==============================================================================
--- RT-Extension-rt_cpan_org/html/Callbacks/rt_cpan_org/Ticket/Elements/Tabs/Default	(original)
+++ RT-Extension-rt_cpan_org/html/Callbacks/rt_cpan_org/Ticket/Elements/Tabs/Default	Fri Dec 11 04:52:06 2009
@@ -9,14 +9,14 @@
 
 my $loc_comment = loc('Comment');
 foreach my $k ( keys %$actions ) {
-    next unless $actions->{$k}{'title'} eq $loc_comment;
+    next unless ($actions->{$k}{'title'}||'') eq $loc_comment;
 
     delete $actions->{$k};
 }
 
 my $loc_resolve = loc('Resolve');
 foreach my $k ( keys %$actions ) {
-    next unless $actions->{$k}{'title'} eq $loc_resolve;
+    next unless ($actions->{$k}{'title'}||'') eq $loc_resolve;
 
     $actions->{$k}{'path'} =~ s{\bAction=Comment\b}{Action=Respond};
 }



More information about the Bps-public-commit mailing list