diff options
| -rwxr-xr-x | perl-install/standalone/draksambashare | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/standalone/draksambashare b/perl-install/standalone/draksambashare index 69017c4bf..3e4ac556b 100755 --- a/perl-install/standalone/draksambashare +++ b/perl-install/standalone/draksambashare @@ -898,12 +898,12 @@ sub modify_user_info { 0, create_okcancel({ cancel_clicked => sub { $dialog->destroy }, ok_clicked => sub { - system("smbpasswd -a $user"); - set_user_passwd($user, $passwd); - $dialog->destroy; - } - }, - ), + system("smbpasswd -a $user -n"); + set_user_passwd($user, $passwd); + $dialog->destroy; + } + }, + ), ); $dialog->show_all; } |