VUser-ActiveDirectory/lib/VUser/ActiveDirectory OLE.pm, 1.3, 1.4

Update of /cvsroot/vuser/VUser-ActiveDirectory/lib/VUser/ActiveDirectory
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv589/lib/VUser/ActiveDirectory

Modified Files:
	OLE.pm 
Log Message:
Add user enable/disable functionality

Index: OLE.pm
===================================================================
RCS file: /cvsroot/vuser/VUser-ActiveDirectory/lib/VUser/ActiveDirectory/OLE.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** OLE.pm	25 Mar 2008 22:00:11 -0000	1.3
--- OLE.pm	25 Mar 2008 22:14:46 -0000	1.4
***************
*** 216,219 ****
--- 216,253 ----
  }

+ sub aduser_enable_disable {
+     my ($cfg, $opts, $action, $eh) =  <at> _;
+     
+     my $ad_server = strip_ws($cfg->{VUser::ActiveDirectory::c_sec()}{'ad server'});
+     my $domain = strip_ws($cfg->{VUser::ActiveDirectory::c_sec()}{'domain'});
+     my $user_ou = strip_ws($cfg->{VUser::ActiveDirectory::c_sec()}{'user ou'});
+     
+     $domain = $opts->{'domain'} if $opts->{'domain'};
+     $user_ou = $opts->{'ou'} if $opts->{'ou'};