summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-08-27 21:56:03 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-08-27 21:56:03 +0000
commit664c7aa1d6fdd8a1001585f43f0920601e1d219e (patch)
tree7aef0c51ae484cd799c8bf4fd4b5fcb118fc7421 /perl-install
parenta634c272b46a6fc9d8f19ea59ba04c6148a27230 (diff)
downloaddrakx-664c7aa1d6fdd8a1001585f43f0920601e1d219e.tar
drakx-664c7aa1d6fdd8a1001585f43f0920601e1d219e.tar.gz
drakx-664c7aa1d6fdd8a1001585f43f0920601e1d219e.tar.bz2
drakx-664c7aa1d6fdd8a1001585f43f0920601e1d219e.tar.xz
drakx-664c7aa1d6fdd8a1001585f43f0920601e1d219e.zip
fix pot regeneration at package build time
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/printer/cups.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/printer/cups.pm b/perl-install/printer/cups.pm
index c4cf6bdb6..d0b89eabf 100644
--- a/perl-install/printer/cups.pm
+++ b/perl-install/printer/cups.pm
@@ -25,9 +25,8 @@ sub lpstat_lpv() {
my @lpstat = run_program::rooted_get_stdout
($::prefix, 'lpstat', '-l', '-p', '-v');
- my $line;
my $currentitem = -1;
- for $line (@lpstat) {
+ for my $line (@lpstat) {
chomp ($line);
if (!($line =~ m!^\s*$!)) {
if ($line =~ m!^printer\s+(\S+)\s+(\S.*)$!) {