[otrs-cvs] Survey/Kernel/System/Ticket/Event SurveySendRequest.pm, 1.17, 1.18

Comments:
Update of /home/cvs/Survey/Kernel/System/Ticket/Event
In directory lancelot:/tmp/cvs-serv20225/Kernel/System/Ticket/Event

Modified Files:
	SurveySendRequest.pm 
Log Message:
Changed EventHandler to new 3.2 behaviour.

Author: jh

Index: SurveySendRequest.pm
===================================================================
RCS file: /home/cvs/Survey/Kernel/System/Ticket/Event/SurveySendRequest.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -2 -u -d -r1.17 -r1.18
--- SurveySendRequest.pm	20 Nov 2012 19:12:41 -0000	1.17
+++ SurveySendRequest.pm	22 Nov 2012 11:59:13 -0000	1.18
@@ -43,5 +43,5 @@
 
     # check needed stuff
-    for my $Argument (qw(TicketID Event Config)) {
+    for my $Argument (qw(Event Config)) {
         if ( !$Param{$Argument} ) {
             $Self->{LogObject}->Log(
@@ -52,4 +52,11 @@
         }
     }
+    if ( !$Param{Data}->{TicketID} ) {
+        $Self->{LogObject}->Log(
+            Priority => 'error',
+            Message  => "Need TicketID!",
+        );
+        return;
+    }
 
     # loop Protection, RequestSend calls HistoryAdd
@@ -60,5 +67,5 @@
     # get ticket data
     my %Ticket = $Self->{TicketObject}->TicketGet(
-        TicketID => $Param{TicketID},
+        TicketID => $Param{Data}{TicketID},
     );
 
@@ -69,5 +76,5 @@
 
         my @ArticleIndex = $Self->{TicketObject}->ArticleIndex(
-            TicketID => $Param{TicketID},
+            TicketID => $Param{Data}{TicketID},
         );
 
@@ -77,5 +84,5 @@
     # send request
     $Self->{SurveyObject}->RequestSend(
-        TicketID => $Param{TicketID},
+        TicketID => $Param{Data}{TicketID},
     );
 
---------------------------------------------------------------------
OTRS mailing list: cvs-log - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/cvs-log
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/cvs-log