From 505cbced45d6cdb4f228a549a7d6c4cf6b099808 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 8 Nov 2002 10:35:58 +0000 Subject: fix my typos --- perl-install/printer.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/printer.pm b/perl-install/printer.pm index 555845306..5e5559ebe 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -106,7 +106,7 @@ sub printer_type($) { sub get_default_spooler () { if (-f "$prefix$FOOMATIC_DEFAULT_SPOOLER") { - my $spool = cat_("$prefix$FOOMATIC_DEFAULT_SPOOLER") + my $spool = cat_("$prefix$FOOMATIC_DEFAULT_SPOOLER"); chomp $spool; return $spool if $spool =~ /cups|lpd|lprng|pdq/; } @@ -2146,7 +2146,7 @@ drive s: file=\":3\" remote # for some photo cards. mtools_skip_check=1 "; - local *F + local *F; open F, ">> $prefix/etc/mtools.conf" or die "can't write mtools config in /etc/mtools.conf: $!"; print F $mtoolsconf_append; -- cgit v1.2.1