[Rt-commit] rt branch, 4.0-trunk, updated. rt-4.0.0rc8-151-g2c2d033

Shawn Moore sartak at bestpractical.com
Wed Apr 20 12:17:32 EDT 2011


The branch, 4.0-trunk has been updated
       via  2c2d03341f0b8ab667edf26108bd33aea3d904fc (commit)
      from  137967c4ca4ec77d70e85221073253d68364c616 (commit)

Summary of changes:
 share/html/Ticket/Elements/PreviewScrips           |    4 ++--
 .../html/Ticket/Elements/ShowSimplifiedRecipients  |    6 +++---
 2 files changed, 5 insertions(+), 5 deletions(-)

- Log -----------------------------------------------------------------
commit 2c2d03341f0b8ab667edf26108bd33aea3d904fc
Author: Shawn M Moore <sartak at bestpractical.com>
Date:   Wed Apr 20 12:17:10 2011 -0400

    Fix more uses of "for my $type qw()"

diff --git a/share/html/Ticket/Elements/PreviewScrips b/share/html/Ticket/Elements/PreviewScrips
index e9df637..8a3364e 100755
--- a/share/html/Ticket/Elements/PreviewScrips
+++ b/share/html/Ticket/Elements/PreviewScrips
@@ -69,7 +69,7 @@ return unless $Object;
           <b><% $scrip->Description || loc('Scrip #[_1]',$scrip->id) %></b><br />
           <&|/l, loc($scrip->ConditionObj->Name), loc($scrip->ActionObj->Name), loc($scrip->TemplateObj->Name)&>[_1] [_2] with template [_3]</&>
           <br />
-%         for my $type qw(To Cc Bcc) {
+%         for my $type (qw(To Cc Bcc)) {
 %             my @addresses =  $scrip->ActionObj->Action->$type();
 %             next unless @addresses;
               <ul>
@@ -97,7 +97,7 @@ return unless $Object;
 %         next unless $rule->{hints} && $rule->{hints}{class} eq 'SendEmail';
           <b><% $rule->Describe %></b>
 %         my $data = $rule->{hints}{recipients};
-%         for my $type qw(To Cc Bcc) {
+%         for my $type (qw(To Cc Bcc)) {
 %             next unless @{$data->{$type}};
               <ul>
 %             for my $address (@{$data->{$type}}) {
diff --git a/share/html/Ticket/Elements/ShowSimplifiedRecipients b/share/html/Ticket/Elements/ShowSimplifiedRecipients
index 18431c8..1efef7e 100644
--- a/share/html/Ticket/Elements/ShowSimplifiedRecipients
+++ b/share/html/Ticket/Elements/ShowSimplifiedRecipients
@@ -58,7 +58,7 @@ return unless $Object;
 my %headers = (To => {}, Cc => {}, Bcc => {});
 if ($Object->Scrips) {
     for my $scrip (grep $_->ActionObj->Action->isa('RT::Action::SendEmail'), @{$Object->Scrips->Prepared}) {
-        for my $type qw(To Cc Bcc) {
+        for my $type (qw(To Cc Bcc)) {
             $headers{$type}{$_->address} = $_
                 for $scrip->ActionObj->Action->$type();
         }
@@ -66,7 +66,7 @@ if ($Object->Scrips) {
 }
 if ($Object->Rules) {
     for my $rule (grep {$_->{hints} and $_->{hints}{class} eq "SendEmail"} @{$Object->Rules}) {
-        for my $type qw(To Cc Bcc) {
+        for my $type (qw(To Cc Bcc)) {
             $headers{$type}{$_} ||= @{[Email::Address->parse($_)]}[0] # Hate list context
                 for @{$rule->{hints}{recipients}{$type}};
         }
@@ -77,7 +77,7 @@ my %recips;
 <&|/Widgets/TitleBox, title => loc('Recipients'), id => 'recipients' &>
 <table>
 <tr>
-% for my $type qw(To Cc Bcc) {
+% for my $type (qw(To Cc Bcc)) {
 %     next unless keys %{$headers{$type}};
 <td valign="top"><% $type %>:</td>
 <td valign="top">

-----------------------------------------------------------------------


More information about the Rt-commit mailing list