From 037ad6f483e9eaae5c9bbf89c373c21991ed8258 Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Wed, 21 Jun 2006 09:17:32 +0000 Subject: fix defaultimage --- samba_wizard/Samba.pm | 4 ++-- samba_wizard/Sambaprint.pm | 4 ++-- samba_wizard/Sambashare.pm | 4 ++-- 3 files changed, 6 insertions(+), 6 deletions(-) (limited to 'samba_wizard') 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'}); -- cgit v1.2.1