From 916ae6acd4bd90da774693e0030f560e1af1b773 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 24 Jul 2001 10:49:46 +0000 Subject: removed/renamed unused/seldom-used functions --- perl-install/printerdrake.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/printerdrake.pm') diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index d0aeffd20..968254a40 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -61,9 +61,9 @@ _("What device is your printer connected to foreach (@parport) { $printer->{DEVICE} eq $_->{port} or next; - $printer->{DBENTRY} = $printer::descr_to_db{common::bestMatchSentence2($_->{val}{DESCRIPTION}, - @printer::entry_db_description)}; - $printer->{cupsDescr} = common::bestMatchSentence2($_->{val}{DESCRIPTION}, keys %printer::descr_to_ppd); + $printer->{DBENTRY} = $printer::descr_to_db{common::bestMatchSentence($_->{val}{DESCRIPTION}, + @printer::entry_db_description)}; + $printer->{cupsDescr} = common::bestMatchSentence($_->{val}{DESCRIPTION}, keys %printer::descr_to_ppd); } 1; } -- cgit v1.2.1