From 78dd1c5b452725709f60ea017882031a4cab38e5 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 19 May 2003 14:14:22 +0000
Subject: perl_checker fixes

---
 perl-install/printer/cups.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/printer/cups.pm')

diff --git a/perl-install/printer/cups.pm b/perl-install/printer/cups.pm
index 60efc7a04..127c342bb 100644
--- a/perl-install/printer/cups.pm
+++ b/perl-install/printer/cups.pm
@@ -8,7 +8,7 @@ use common;
 
 
 #------------------------------------------------------------------------------
-sub lpstat_v {
+sub lpstat_v() {
     map {
 	if (my ($queuename, $uri) = m/^\s*device\s+for\s+([^:\s]+):\s*(\S+)\s*$/) {
 	    +{ queuename => $queuename, uri => $uri, if_($uri =~ m!^ipp://([^/:]+)[:/]!, ipp => $1) };
-- 
cgit v1.2.1