diff options
Diffstat (limited to 'main/rt4')
| -rw-r--r-- | main/rt4/APKBUILD | 10 | ||||
| -rw-r--r-- | main/rt4/rt4-perl-qw-list-deprecation.patch | 49 |
2 files changed, 4 insertions, 55 deletions
diff --git a/main/rt4/APKBUILD b/main/rt4/APKBUILD index 6f428d66ef..8645d2916e 100644 --- a/main/rt4/APKBUILD +++ b/main/rt4/APKBUILD @@ -1,8 +1,8 @@ # Contributor: Natanael Copa <ncopa@alpinelinux.org> # Maintainer: Natanael Copa <ncopa@alpinelinux.org> pkgname=rt4 -pkgver=4.0.0 -pkgrel=1 +pkgver=4.0.1 +pkgrel=0 pkgdesc="Request Tracker - issue and bug tracker" url="http://www.bestpractical.com/rt" arch="noarch" @@ -70,8 +70,7 @@ depends="perl makedepends="$depends" install="" subpackages="" -source="http://www.bestpractical.com/pub/rt/release/rt-$pkgver.tar.gz - rt4-perl-qw-list-deprecation.patch" +source="http://www.bestpractical.com/pub/rt/release/rt-$pkgver.tar.gz" _builddir="$srcdir"/rt-$pkgver prepare() { @@ -125,5 +124,4 @@ package() { make DESTDIR="$pkgdir" install || return 1 } -md5sums="bd6045421a6f2d0e8c18923f80726e4a rt-4.0.0.tar.gz -ff469c9469be2bc094601939068e60ae rt4-perl-qw-list-deprecation.patch" +md5sums="bde89fbdadf7b709fb13f32638848b9d rt-4.0.1.tar.gz" diff --git a/main/rt4/rt4-perl-qw-list-deprecation.patch b/main/rt4/rt4-perl-qw-list-deprecation.patch deleted file mode 100644 index 6887539995..0000000000 --- a/main/rt4/rt4-perl-qw-list-deprecation.patch +++ /dev/null @@ -1,49 +0,0 @@ ---- a/share/html/Ticket/Elements/PreviewScrips -+++ b/share/html/Ticket/Elements/PreviewScrips -@@ -69,7 +69,7 @@ - <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 @@ - % 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}}) { ---- a/share/html/Ticket/Elements/ShowSimplifiedRecipients -+++ b/share/html/Ticket/Elements/ShowSimplifiedRecipients -@@ -58,7 +58,7 @@ - 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->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 @@ - <&|/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"> |