From 28144af329c8b25ceffda8eb107ccb61ec580648 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 16 Jan 2004 23:06:09 +0000 Subject: do not export dead functions --- perl-install/network/adsl.pm | 2 +- perl-install/network/ethernet.pm | 2 +- perl-install/network/isdn.pm | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install') diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm index 02d249b8f..b840c8bfc 100644 --- a/perl-install/network/adsl.pm +++ b/perl-install/network/adsl.pm @@ -9,7 +9,7 @@ use vars qw(@ISA @EXPORT); use MDK::Common::Globals "network", qw($in $prefix); @ISA = qw(Exporter); -@EXPORT = qw(adsl_ask_info adsl_detect adsl_conf adsl_conf_backend); +@EXPORT = qw(adsl_conf_backend); sub get_wizard { diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm index 80419f9b5..26a58a9af 100644 --- a/perl-install/network/ethernet.pm +++ b/perl-install/network/ethernet.pm @@ -13,7 +13,7 @@ use vars qw(@ISA @EXPORT); use MDK::Common::Globals "network", qw($in $prefix); @ISA = qw(Exporter); -@EXPORT = qw(conf_network_card conf_network_card_backend go_ethernet); +@EXPORT = qw(conf_network_card_backend); my (@cards, @ether_steps, $last, %last); diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm index b66edfe75..310aadc20 100644 --- a/perl-install/network/isdn.pm +++ b/perl-install/network/isdn.pm @@ -14,7 +14,7 @@ use MDK::Common::File; @ISA = qw(Exporter); -@EXPORT = qw(isdn_write_config isdn_write_config_backend get_info_providers_backend isdn_ask_info isdn_ask_protocol isdn_ask isdn_detect isdn_detect_backend isdn_get_list isdn_get_info); +@EXPORT = qw(isdn_write_config isdn_write_config_backend get_info_providers_backend isdn_ask_info isdn_ask_protocol isdn_ask isdn_detect_backend isdn_get_list isdn_get_info); sub isdn_write_config { -- cgit v1.2.1