[Rt-commit] r8743 - in rtir/branches/2.3-EXPERIMENTAL: .
sartak at bestpractical.com
sartak at bestpractical.com
Mon Aug 27 12:27:11 EDT 2007
Author: sartak
Date: Mon Aug 27 12:27:10 2007
New Revision: 8743
Modified:
rtir/branches/2.3-EXPERIMENTAL/ (props changed)
rtir/branches/2.3-EXPERIMENTAL/html/Callbacks/RTIR/Elements/RT__Ticket/ColumnMap/Once
Log:
r37454 at onn: sartak | 2007-08-27 12:26:55 -0400
Moving OwnerNameKey and RequestorsKey into RT since it's not very RTIR-specific and can be way more easily tested
Modified: rtir/branches/2.3-EXPERIMENTAL/html/Callbacks/RTIR/Elements/RT__Ticket/ColumnMap/Once
==============================================================================
--- rtir/branches/2.3-EXPERIMENTAL/html/Callbacks/RTIR/Elements/RT__Ticket/ColumnMap/Once (original)
+++ rtir/branches/2.3-EXPERIMENTAL/html/Callbacks/RTIR/Elements/RT__Ticket/ColumnMap/Once Mon Aug 27 12:27:10 2007
@@ -63,37 +63,6 @@
return \$yesno;
},
};
-$COLUMN_MAP->{'RequestorsKey'} = {
- title => 'Requestors',
- attribute => 'Requestor.EmailAddress',
- value => sub {
- my $t = shift;
- my @requestors = $t->Requestors->MemberEmailAddresses;
- for my $email (@requestors)
- {
- my %key = RT::Crypt::GnuPG::GetKeyInfo($email);
- if (!defined $key{'info'}) {
- $email .= " (no pubkey!)";
- }
- }
- return join ', ', @requestors;
- }
-};
-$COLUMN_MAP->{'OwnerNameKey'} = {
- title => 'Owner',
- attribute => 'Owner',
- value => sub {
- my $t = shift;
- my $email = $t->OwnerObj->EmailAddress;
- return $email if $email eq '';
-
- my %key = RT::Crypt::GnuPG::GetKeyInfo($email);
- if (!defined $key{'info'}) {
- $email .= " (no pubkey!)";
- }
- return $email;
- }
-};
</%INIT>
<%ARGS>
More information about the Rt-commit
mailing list