diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-01-13 09:03:49 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-01-13 09:03:49 +0000 |
| commit | 436d82157496aa9e025492cb77f9fd73ee42f2cb (patch) | |
| tree | 34651c08852b2b1d31843082d2cad5e45a1f87e1 /perl-install | |
| parent | 59902287717f3b968e9e63f032d243865e0155b2 (diff) | |
| download | drakx-backup-do-not-use-436d82157496aa9e025492cb77f9fd73ee42f2cb.tar drakx-backup-do-not-use-436d82157496aa9e025492cb77f9fd73ee42f2cb.tar.gz drakx-backup-do-not-use-436d82157496aa9e025492cb77f9fd73ee42f2cb.tar.bz2 drakx-backup-do-not-use-436d82157496aa9e025492cb77f9fd73ee42f2cb.tar.xz drakx-backup-do-not-use-436d82157496aa9e025492cb77f9fd73ee42f2cb.zip | |
simplify set_cups_autoconf()
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/printer/main.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm index 592843631..d65c7044b 100644 --- a/perl-install/printer/main.pm +++ b/perl-install/printer/main.pm @@ -654,11 +654,8 @@ sub set_cups_autoconf { sub get_cups_autoconf { local *F; open F, "< $::prefix/etc/sysconfig/printing" or return 1; - my $line; - while ($line = <F>) { - if ($line =~ m!^[^\#]*CUPS_CONFIG=manual!) { - return 0; - } + while (my $line = <F>) { + return 0 if $line =~ m!^[^\#]*CUPS_CONFIG=manual!; } return 1; } |