[Rt-commit] rt branch, 4.0-trunk, updated. rt-4.0.0rc8-150-g137967c
Shawn Moore
sartak at bestpractical.com
Wed Apr 20 11:17:17 EDT 2011
The branch, 4.0-trunk has been updated
via 137967c4ca4ec77d70e85221073253d68364c616 (commit)
from 0f6598b82a3cc2e3a54a34dfc494aa27f9c036cd (commit)
Summary of changes:
lib/RT/Articles.pm | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
- Log -----------------------------------------------------------------
commit 137967c4ca4ec77d70e85221073253d68364c616
Author: Shawn M Moore <sartak at bestpractical.com>
Date: Wed Apr 20 11:05:17 2011 -0400
Parenthesize our "for qw()"s
5.14 warns about them now
diff --git a/lib/RT/Articles.pm b/lib/RT/Articles.pm
index 355a2bd..b25c514 100644
--- a/lib/RT/Articles.pm
+++ b/lib/RT/Articles.pm
@@ -583,7 +583,7 @@ sub Search {
require Time::ParseDate;
- foreach my $date qw(Created< Created> LastUpdated< LastUpdated>) {
+ foreach my $date (qw(Created< Created> LastUpdated< LastUpdated>)) {
next unless ( $args{$date} );
my $seconds = Time::ParseDate::parsedate( $args{$date}, FUZZY => 1, PREFER_PAST => 1 );
my $date_obj = RT::Date->new( $self->CurrentUser );
@@ -791,7 +791,7 @@ sub Search {
);
}
- foreach my $field qw(Name Summary Class) {
+ foreach my $field (qw(Name Summary Class)) {
my @MatchLike =
( ref $args{ $field . "~" } eq 'ARRAY' )
-----------------------------------------------------------------------
More information about the Rt-commit
mailing list