[Rt-commit] r8733 - in rtir/branches/2.3-EXPERIMENTAL: .
sartak at bestpractical.com
sartak at bestpractical.com
Fri Aug 24 17:47:42 EDT 2007
Author: sartak
Date: Fri Aug 24 17:47:41 2007
New Revision: 8733
Modified:
rtir/branches/2.3-EXPERIMENTAL/ (props changed)
rtir/branches/2.3-EXPERIMENTAL/html/Callbacks/RTIR/Elements/RT__Ticket/ColumnMap/Once
Log:
r19934 at onn: sartak | 2007-08-24 17:47:36 -0400
Flesh out the columnmaps, just need to find the actual check for pubkey
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 Fri Aug 24 17:47:41 2007
@@ -65,12 +65,29 @@
$COLUMN_MAP->{'RequestorsKey'} = {
title => 'Requestors',
attribute => 'Requestor.EmailAddress',
- value => sub { return $_[0]->Requestors->MemberEmailAddressesAsString }
+ value => sub {
+ my $t = shift;
+ my @requestors = $t->Requestors->MemberEmailAddresses;
+ for (@requestors)
+ {
+ if ("we don't have key") {
+ $_ .= " (no pubkey!)";
+ }
+ }
+ return join ', ', @requestors;
+ }
};
$COLUMN_MAP->{'OwnerNameKey'} = {
title => 'Owner',
attribute => 'Owner',
- value => sub { return $_[0]->OwnerObj->Name }
+ value => sub {
+ my $t = shift;
+ my $email = $t->OwnerObj->EmailAddress;
+ if ("we don't have key") {
+ $email .= " (no pubkey!)";
+ }
+ return $email;
+ }
};
</%INIT>
More information about the Rt-commit
mailing list