[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