Author: jsuchome Date: Tue Aug 21 17:05:20 2007 New Revision: 40383 URL: http://svn.opensuse.org/viewcvs/yast?rev=40383&view=rev Log: SetBaseDirectory can be useful... Modified: trunk/users/src/UsersPasswd.pm Modified: trunk/users/src/UsersPasswd.pm URL: http://svn.opensuse.org/viewcvs/yast/trunk/users/src/UsersPasswd.pm?rev=40383&r1=40382&r2=40383&view=diff ============================================================================== --- trunk/users/src/UsersPasswd.pm (original) +++ trunk/users/src/UsersPasswd.pm Tue Aug 21 17:05:20 2007 @@ -928,6 +928,13 @@ return {}; } +# set the new the value of base directory +BEGIN { $TYPEINFO{SetBaseDirectory} = ["function", "void", "string"]; } +sub SetBaseDirectory { + my $self = shift; + my $dir = shift; + $base_directory = $dir if (defined $dir); +} 42 # EOF -- To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org For additional commands, e-mail: yast-commit+help@opensuse.org