Mailinglist Archive: yast-commit (233 mails)

[locilka@xxxxxxxxxxxxxxxxx]

Author: locilka
Date: Mon Jan 10 14:16:17 2011
New Revision: 63143

URL: http://svn.opensuse.org/viewcvs/yast?rev=63143&view=rev
Log:
Fixing 'switch wipeout'


Modified:
    trunk/samba-server/src/SambaBackendLDAP.pm

Modified: trunk/samba-server/src/SambaBackendLDAP.pm
URL: 
http://svn.opensuse.org/viewcvs/yast/trunk/samba-server/src/SambaBackendLDAP.pm?rev=63143&r1=63142&r2=63143&view=diff
==============================================================================
--- trunk/samba-server/src/SambaBackendLDAP.pm (original)
+++ trunk/samba-server/src/SambaBackendLDAP.pm Mon Jan 10 14:16:17 2011
@@ -309,14 +309,16 @@
 
     # create dn
     y2milestone("Creating dn: $dn");
-    my $map;
-    given($attr) {
-       when ("dc") {$map = {objectClass => ["top", "dcObject"], dc => $value}}
-       when ("ou") {$map = {objectClass => ["top", "organizationalUnit"], ou 
=> $value}}
-       # translators: error message, followed by class giving error
-       default {return __("Unknown Class:")." $dn\n".__("Only dcObject (dc) 
and organizationalUnit (ou) classes are supported.")}
-    };
-    
+    my $map = {};
+
+    if ($attr eq "dc") {
+       $map = {objectClass => ["top", "dcObject"], dc => $value};
+    } elsif ($attr eq "ou") {
+       $map = {objectClass => ["top", "organizationalUnit"], ou => $value};
+    } else {
+       return __("Unknown Class:")." $dn\n".__("Only dcObject (dc) and 
organizationalUnit (ou) classes are supported.");
+    }
+
     if ($map && !SCR->Write(".ldap.add", {dn=>$dn}, $map)) {
        return getLdapError();
     }

-- 
To unsubscribe, e-mail: yast-commit+unsubscribe@xxxxxxxxxxxx
For additional commands, e-mail: yast-commit+help@xxxxxxxxxxxx