From a90bddd8d909a3d2f468d35e2093a0e5550bdaa4 Mon Sep 17 00:00:00 2001 From: rettenbe Date: Mon, 2 Jun 2008 16:32:50 +0000 Subject: [PATCH] * under construction git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@11156 594d385d-05f5-0310-b6e9-bd551577e9d8 --- gosa-si/server/events/gosaTriggered.pm | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/gosa-si/server/events/gosaTriggered.pm b/gosa-si/server/events/gosaTriggered.pm index e52ca596a..da0ee258c 100644 --- a/gosa-si/server/events/gosaTriggered.pm +++ b/gosa-si/server/events/gosaTriggered.pm @@ -344,7 +344,7 @@ sub ping { my ($msg, $msg_hash, $session_id) = @_ ; my $header = @{$msg_hash->{header}}[0]; my $target = @{$msg_hash->{target}}[0]; - my $source = @{$msg_hash->{target}}[0]; + my $source = @{$msg_hash->{source}}[0]; my ($sql, $res); my $out_msg = $msg; @@ -380,15 +380,14 @@ sub ping { my $answer_xml = @{@$res[0]}[3]; my %data = ( 'answer_xml' => 'bin noch da' ); my $answer_msg = &build_msg("got_ping", $target, $source, \%data); - - $sql = "DELETE FROM $main::incoming_tn WHERE id=$message_id"; - $res = $main::incoming_db->exec_statement($sql); - my $forward_to_gosa = @{$msg_hash->{'forward_to_gosa'}}[0]; if (defined $forward_to_gosa) { $answer_msg =~s/<\/xml>/$forward_to_gosa<\/forward_to_gosa><\/xml>/; } + $sql = "DELETE FROM $main::incoming_tn WHERE id=$message_id"; + $res = $main::incoming_db->exec_statement($sql); + my @answer_msg_l = ( $answer_msg ); return @answer_msg_l; } -- 2.30.2