From 66f4349b2cb8722e7a6dd3128f2ad667bc361bce Mon Sep 17 00:00:00 2001 From: janw Date: Wed, 23 Apr 2008 08:29:05 +0000 Subject: [PATCH] Fix Net::LDAP::Entry->delete call with documentation (delete($entry => []) instead of delete($entry)). git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@10635 594d385d-05f5-0310-b6e9-bd551577e9d8 --- gosa-si/server/events/siTriggered.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/gosa-si/server/events/siTriggered.pm b/gosa-si/server/events/siTriggered.pm index 5f7e73172..18a2a5eb0 100644 --- a/gosa-si/server/events/siTriggered.pm +++ b/gosa-si/server/events/siTriggered.pm @@ -208,7 +208,7 @@ sub detected_hardware { if(defined($msg_hash->{detected_hardware}[0]->{$attribute}) && length($msg_hash->{detected_hardware}[0]->{$attribute}) >0 ) { if(defined($entry->get_value($attribute))) { - $entry->delete($attribute); + $entry->delete($attribute => []); } &main::daemon_log("INFO: Adding attribute $attribute with value ".$msg_hash->{detected_hardware}[0]->{$attribute},5); $entry->add($attribute => $msg_hash->{detected_hardware}[0]->{$attribute}); @@ -219,7 +219,7 @@ sub detected_hardware { if(defined($msg_hash->{detected_hardware}[0]->{$attribute}) && length($msg_hash->{detected_hardware}[0]->{$attribute}) >0 ) { if(defined($entry->get_value($attribute))) { - $entry->delete($attribute); + $entry->delete($attribute => []); } foreach my $array_entry (keys %{{map { $_ => 1 } sort(@{$msg_hash->{detected_hardware}[0]->{$attribute}}) }}) { $entry->add($attribute => $array_entry); -- 2.30.2