summaryrefslogtreecommitdiffstats
path: root/perl-install/printer.pm
diff options
context:
space:
mode:
authorpad <pad@mandriva.com>1999-09-06 20:33:18 +0000
committerpad <pad@mandriva.com>1999-09-06 20:33:18 +0000
commit115b4b1145f86d90f20c0404a54fa907f06c30b0 (patch)
tree046cd13affb85df1028bcc687e1c8853fc576cd7 /perl-install/printer.pm
parenta6096f902a2df839b7e89c084d629840bf52a3a1 (diff)
downloaddrakx-backup-do-not-use-115b4b1145f86d90f20c0404a54fa907f06c30b0.tar
drakx-backup-do-not-use-115b4b1145f86d90f20c0404a54fa907f06c30b0.tar.gz
drakx-backup-do-not-use-115b4b1145f86d90f20c0404a54fa907f06c30b0.tar.bz2
drakx-backup-do-not-use-115b4b1145f86d90f20c0404a54fa907f06c30b0.tar.xz
drakx-backup-do-not-use-115b4b1145f86d90f20c0404a54fa907f06c30b0.zip
bugfix
Diffstat (limited to 'perl-install/printer.pm')
-rw-r--r--perl-install/printer.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index 2ea70fe8e..37f0d61c3 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -460,17 +460,17 @@ sub configure_queue($) {
if ($entry->{TYPE} eq "SMB") {
#- simple config file required if SMB printer
- my $config_file = "$prefix$queue_path.config";
+ my $config_file = "$prefix$queue_path/.config";
local *F;
open F, ">$config_file" or die "Can't create $config_file $!";
print F "share='\\\\$entry->{SMBHOST}\\$entry->{SMBSHARE}'\n";
- print F "hostip='$entry->{SMBHOSTIP}'\n";
+ print F "hostip=$entry->{SMBHOSTIP}\n";
print F "user='$entry->{SMBUSER}'\n";
print F "password='$entry->{SMBPASSWD}'\n";
print F "workgroup='$entry->{SMBWORKGROUP}'\n";
} elsif ($entry->{TYPE} eq "NCP") {
#- same for NCP printer
- my $config_file = "$prefix$queue_path.config";
+ my $config_file = "$prefix$queue_path/.config";
local *F;
open F, ">$config_file" or die "Can't create $config_file $!";
print F "server=$entry->{NCPHOST}\n";