diff options
Diffstat (limited to 'samba_wizard')
-rwxr-xr-x | samba_wizard/Samba.pm | 4 | ||||
-rwxr-xr-x | samba_wizard/Sambaprint.pm | 4 | ||||
-rwxr-xr-x | samba_wizard/Sambashare.pm | 4 |
3 files changed, 6 insertions, 6 deletions
diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm index 1a2da921..d057f9b1 100755 --- a/samba_wizard/Samba.pm +++ b/samba_wizard/Samba.pm @@ -69,9 +69,9 @@ my $o = { test_host_domain($SHORTHOSTNAME, $DOMAINNAME); }, needed_rpm => [ 'samba-server' ], - defaultimage => "/usr/share/wizards/samba_wizard/images/sambasrv.png" + defaultimage => "/usr/share/wizards/samba_wizard/images/sambasrv.png", }; -$::Wizard_pix_up = "/usr/share/wizards/samba_wizard/images/sambasrv.png"; + # we ask glueconf to give us the structure representing /etc/samba/smb.conf if (!-f "/etc/samba/smb.conf") { mkdir_p("/etc/samba/"); cp_af("/usr/share/wizards/samba_wizard/scripts/smb.conf.default", "/etc/samba/smb.conf") } my $samba = new Libconf::Glueconf::Samba::Smb_conf({ filename => '/etc/samba/smb.conf' }); diff --git a/samba_wizard/Sambaprint.pm b/samba_wizard/Sambaprint.pm index b0821be0..d6816a13 100755 --- a/samba_wizard/Sambaprint.pm +++ b/samba_wizard/Sambaprint.pm @@ -44,9 +44,9 @@ my $o = { wiz_printers_browseable => '', wiz_printers_guestok => '', wiz_printers_createmode => '', list_printers => '', }, - defaultimage => "/usr/share/wizards/samba_wizard/images/IC-sambaprt-48.png" + defaultimage => "/usr/share/wizards/samba_wizard/images/IC-sambaprt-48.png", }; -$::Wizard_pix_up = "/usr/share/wizards/samba_wizard/images/IC-sambaprt-48.png"; + # we ask glueconf to give us the structure representing /etc/samba/smb.conf my $samba = new Libconf::Glueconf::Samba::Smb_conf({ filename => '/etc/samba/smb.conf'}); diff --git a/samba_wizard/Sambashare.pm b/samba_wizard/Sambashare.pm index b90658d5..9545feb2 100755 --- a/samba_wizard/Sambashare.pm +++ b/samba_wizard/Sambashare.pm @@ -53,9 +53,9 @@ my $o = { wiz_understanding => '', }, needed_rpm => [ 'samba-server' ], - defaultimage => "/usr/share/wizards/samba_wizard/images/IC-sambashare-48.png" + defaultimage => "/usr/share/wizards/samba_wizard/images/IC-sambashare-48.png", }; -$::Wizard_pix_up = "/usr/share/wizards/samba_wizard/images/IC-sambashare-48.png"; + # we ask glueconf to give us the structure representing /etc/samba/smb.conf my $samba = new Libconf::Glueconf::Samba::Smb_conf({ filename => '/etc/samba/smb.conf'}); |