Fixed perl error

git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@11138 594d385d-05f5-0310-b6e9-bd551577e9d8

diff --git a/gosa-si/server/events/gosaTriggered.pm b/gosa-si/server/events/gosaTriggered.pm
index 1d9ccf6f495e2f74994e4445e3fb77e6588ade5b..68f3a6f75baffd1627566fd9e3bbcf0ce871ae17 100644 (file)
--- a/gosa-si/server/events/gosaTriggered.pm
+++ b/gosa-si/server/events/gosaTriggered.pm
@@ -841,7 +841,7 @@ sub trigger_activate_new {
                $base = "ou=systems,".$base;
 
                # Search for an existing entry (should be in ou=incoming)
-               my $ldap_mesg= $ldap_handle->search(
+               $ldap_mesg= $ldap_handle->search(
                        base => $main::ldap_base,
                        scope => 'sub',
                        filter => "(&(objectClass=GOhard)(|(macAddress=$mac)(dhcpHWaddress=$mac)))",