From c700f4f73a858b69eb7183aa25abb1f710563571 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 30 Jul 2001 17:08:08 +0000 Subject: use MDK::Common i wonder why it was included and Till used an older version without merging? --- perl-install/printerdrake.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/printerdrake.pm') diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index 5fb132131..18d368e78 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -4,7 +4,7 @@ package printerdrake; use diagnostics; use strict; -use common qw(:common :file :functional :system); +use common; use detect_devices; use commands; use modules; @@ -84,7 +84,7 @@ complete => sub { foreach (@parport) { $device eq $_->{port} or next; $printer->{DBENTRY} = - common::bestMatchSentence2($_->{val}{DESCRIPTION}, + bestMatchSentence($_->{val}{DESCRIPTION}, keys %printer::thedb); } 1; -- cgit v1.2.1