Creating of new groups works.

[licom.git] / lib / LiCoM / Group.pm

diff --git a/lib/LiCoM/Group.pm b/lib/LiCoM/Group.pm
index 79530f1..7bdc500 100644 (file)
--- a/lib/LiCoM/Group.pm
+++ b/lib/LiCoM/Group.pm
@@ -118,7 +118,7 @@ sub create ($$$@)
        $entry->add (ou => $ou);
        $entry->add (cn => $name);
        $entry->add (member => [map { _cn_to_dn ($_) } (@members)]);
-       $entry->add (description => $desc);
+       $entry->add (description => $desc) if ($desc);
        $entry->dn ($dn);
 
        $entry->changetype ('add');