From 9266168309a593e84c47cc59edb2a6ccd49e4686 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Mon, 13 Mar 2000 18:28:03 +0000 Subject: *** empty log message *** --- perl-install/install_any.pm | 1 - 1 file changed, 1 deletion(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 41a46f93b..1b908e062 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -35,7 +35,6 @@ use log; $current_medium = ''; $asked_medium = ''; %refused_media = (); -sub medium() { $current_medium } sub useMedium($) { $asked_medium eq $_[0] or log::l("selecting new medium $_[0]"); $asked_medium = $_[0] } sub changeMedium($$) { my ($method, $medium) = @_; -- cgit v1.2.1