summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorAntoine Ginies <aginies@mandriva.com>2005-08-26 11:00:02 +0000
committerAntoine Ginies <aginies@mandriva.com>2005-08-26 11:00:02 +0000
commit825d4e31955c49bfe91f0917cc4b564c5f9bc06f (patch)
tree4edbdb225a0a6d89c30680ad45fedd300f525f72 /perl-install/standalone
parent7b6e8345e243e1366bd1e5b89d460cd4137f9fda (diff)
downloaddrakx-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar
drakx-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar.gz
drakx-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar.bz2
drakx-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.tar.xz
drakx-825d4e31955c49bfe91f0917cc4b564c5f9bc06f.zip
now display share name in modification dialog box
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/draksambashare9
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]);