diff options
| author | Antoine Ginies <aginies@mandriva.com> | 2005-08-26 11:00:02 +0000 |
|---|---|---|
| committer | Antoine Ginies <aginies@mandriva.com> | 2005-08-26 11:00:02 +0000 |
| commit | 825d4e31955c49bfe91f0917cc4b564c5f9bc06f (patch) | |
| tree | 4edbdb225a0a6d89c30680ad45fedd300f525f72 | |
| parent | 7b6e8345e243e1366bd1e5b89d460cd4137f9fda (diff) | |
| download | drakx-backup-do-not-use-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar drakx-backup-do-not-use-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar.gz drakx-backup-do-not-use-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar.bz2 drakx-backup-do-not-use-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar.xz drakx-backup-do-not-use-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.zip | |
now display share name in modification dialog box
| -rwxr-xr-x | perl-install/standalone/draksambashare | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/standalone/draksambashare b/perl-install/standalone/draksambashare index 2e61b88c0..a7f960713 100755 --- a/perl-install/standalone/draksambashare +++ b/perl-install/standalone/draksambashare @@ -44,7 +44,7 @@ sub create_share_list() { N("Share directory") => 'text', N("Comment") => 'text', N("Browseable") => 'text', - N("Public") => 'text', + N("Public") => 'bool', N("Writable") => 'text', N("Create mask") => 'text', N("Directory mask") => 'text', @@ -447,7 +447,8 @@ sub modify_printers_entry { $_->set_popdown_strings(@yesno) foreach $browseable, $printable, $guest_ok, $writable, $use_client_driver, $inherit_permissions; $selected or info_dialog(N("Error"), N("Please add or select a Samba printer share to be able to modify it.")) and return; - $share_name->set_text($printer_list->{data}[$selected][0]); + my $s = $printer_list->{data}[$selected][0]; + $share_name->set_text($s); $dir->set_text($printer_list->{data}[$selected][1]); $comment->set_text($printer_list->{data}[$selected][2]); $browseable->set_text($printer_list->{data}[$selected][3]); @@ -520,8 +521,8 @@ sub modify_entry { $w->{window}->set_modal(1); $selected or info_dialog(N("Error"), N("Please add or select a Samba share to be able to modify it.")) and return; - - $share_name->set_text($share_list->{data}[$selected][0]); + my $s = $share_list->{data}[$selected][0]; + $share_name->set_text($s); $dir->set_text($share_list->{data}[$selected][1]); $comment->set_text($share_list->{data}[$selected][2]); $browseable->set_text($share_list->{data}[$selected][3]); |