[otrs-cvs] otrs/Kernel/Modules AgentTicketPhone.pm,1.64,1.65

[CVS commits notifications of OTRS.org]

Comments:
Update of /home/cvs/otrs/Kernel/Modules
In directory lancelot:/tmp/cvs-serv10926/Kernel/Modules

Modified Files:
	AgentTicketPhone.pm 
Log Message:
TicketFreeTime, TicketFreeFields and Article Attachments now are taken over on ticket split.

Author: martin

Index: AgentTicketPhone.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/Modules/AgentTicketPhone.pm,v
retrieving revision 1.64
retrieving revision 1.65
diff -C2 -d -r1.64 -r1.65
*** AgentTicketPhone.pm	17 Apr 2008 06:42:33 -0000	1.64
--- AgentTicketPhone.pm	29 Apr 2008 15:12:48 -0000	1.65
***************
*** 142,145 ****
--- 142,179 ----
              );
  
+             # fill free text fields
+             for my $Count ( 1..16 ) {
+                 if ( defined $Article{ 'TicketFreeKey' . $Count } ) {
+                     $GetParam{ 'TicketFreeKey' . $Count } = $Article{ 'TicketFreeKey' . $Count };
+                 }
+                 if ( defined $Article{ 'TicketFreeText' . $Count } ) {
+                     $GetParam{ 'TicketFreeText' . $Count } = $Article{ 'TicketFreeText' . $Count };
+                 }
+             }
+ 
+             # fill free time fields
+             for my $Count ( 1..6 ) {
+                 if ( defined $Article{ 'TicketFreeTime' . $Count } ) {
+                     $GetParam{ 'TicketFreeTime' . $Count . 'Used' } = 1;
+                     my $SystemTime = $Self->{TimeObject}->TimeStamp2SystemTime(
+                         String => $Article{ 'TicketFreeTime' . $Count },
+                     );
+                     my ($Sec, $Min, $Hour, $Day, $Month, $Year) = $Self->{TimeObject}->SystemTime2Date(
+                         SystemTime => $SystemTime,
+                     );
+                     $GetParam{ 'TicketFreeTime'  . $Count . 'Year' }   = $Year;
+                     $GetParam{ 'TicketFreeTime'  . $Count . 'Month' }  = $Month;
+                     $GetParam{ 'TicketFreeTime'  . $Count . 'Day' }    = $Day;
+                     $GetParam{ 'TicketFreeTime'  . $Count . 'Hour' }   = $Hour;
+                     $GetParam{ 'TicketFreeTime'  . $Count . 'Minute' } = $Min;
+ 
+                     # do agent time zone translation
+                     %GetParam = $Self->{LayoutObject}->TransfromDateSelection(
+                         %GetParam,
+                         Prefix => 'TicketFreeTime' . $Count,
+                     );
+                 }
+             }
+ 
              # get attachments
              my %ArticleIndex = $Self->{TicketObject}->ArticleAttachmentIndex(
***************
*** 165,169 ****
                  }
                  elsif ( $Article{'ContentType'} !~ /text\/plain/i ) {
!                     $Article{Body} = "-> no quotable message <-";
                  }
              }
--- 199,203 ----
                  }
                  elsif ( $Article{'ContentType'} !~ /text\/plain/i ) {
!                     $Article{Body} = '-> no quotable message <-';
                  }
              }