diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-07-17 11:17:51 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-07-17 11:17:51 +0000 |
commit | 063027ee2ff8df152a3d3a758916c0457fc18a89 (patch) | |
tree | 4b8cd399c8c15fe7242cdbcdf43135609f8b60c0 /perl-install/printerdrake.pm | |
parent | 127a2a70946027f2f5c8855f9450713407213441 (diff) | |
download | drakx-063027ee2ff8df152a3d3a758916c0457fc18a89.tar drakx-063027ee2ff8df152a3d3a758916c0457fc18a89.tar.gz drakx-063027ee2ff8df152a3d3a758916c0457fc18a89.tar.bz2 drakx-063027ee2ff8df152a3d3a758916c0457fc18a89.tar.xz drakx-063027ee2ff8df152a3d3a758916c0457fc18a89.zip |
remove "$_ =~ " (as detected by new perl_checker)
Diffstat (limited to 'perl-install/printerdrake.pm')
-rw-r--r-- | perl-install/printerdrake.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index b14a75e25..9985e209e 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -2390,7 +2390,7 @@ sub main { $printer->{configured}{$printer->{DEFAULT}}{'queuedata'}{'menuentry'} . _(" (Default)"); } elsif ($printer->{SPOOLER} eq "cups") { ($cursorpos) = - grep { $_ =~ /!$printer->{DEFAULT}:[^!]*$/ } + grep { /!$printer->{DEFAULT}:[^!]*$/ } printer::get_cups_remote_queues($printer); } } |