[Rt-commit] r5247 - RT-Extension-CommandByEmail/lib/RT/Interface/Email/Filter

[ruz at bestpractical.com]

Author: ruz
Date: Thu May 18 10:30:20 2006
New Revision: 5247

Modified:
   RT-Extension-CommandByEmail/lib/RT/Interface/Email/Filter/TakeAction.pm

Log:
* use requestor email, not id

Modified: RT-Extension-CommandByEmail/lib/RT/Interface/Email/Filter/TakeAction.pm
==============================================================================
--- RT-Extension-CommandByEmail/lib/RT/Interface/Email/Filter/TakeAction.pm	(original)
+++ RT-Extension-CommandByEmail/lib/RT/Interface/Email/Filter/TakeAction.pm	Thu May 18 10:30:20 2006
@@ -26,11 +26,14 @@
 Priority: <#> Set new priority to the given value (1-99)
 FinalPriority: <#> Set new final priority to the given value (1-99)
 
-=head3 Dates and time
+=head3 Dates
 
 Due: <new timestamp> Set new due date/timestamp, or 0 to disable.
 Starts: <new timestamp>
 Started: <new timestamp>
+
+=head3 Time
+
 TimeWorked: <minutes> Replace the tickets 'timeworked' value.
 TimeEstimated: <minutes>
 TimeLeft: <minutes>
@@ -49,13 +52,11 @@
 
 =head3 Links
 
-+DependsOn:
-+AddDependsOn:
-+DelDependsOn
++DependsOn: <#> Set link(s) using ticket id
 +DependedOnBy:
 +RefersTo:
 +ReferredToBy:
-+HasMember:
++Members:
 +MemberOf:
 
 =head3 Custom field values
@@ -323,7 +324,7 @@
         # First of all fetch default values
         foreach my $type ( qw(Requestor Cc AdminCc) ) {
             my %tmp = _ParseAdditiveCommand( \%cmds, 1, $type );
-            $tmp{'Default'} = [ $args{'CurrentUser'}->id ] if $type eq 'Requestor';
+            $tmp{'Default'} = [ $args{'CurrentUser'}->EmailAddress ] if $type eq 'Requestor';
             $tmp{'Default'} = [
                 ParseCcAddressesFromHead(
                     Head        => $args{'Message'}->head,