svn commit: samba r6924 - in branches/SAMBA_4_0/source/build/smb_build: .

[jelmer at samba.org]

Author: jelmer
Date: 2005-05-20 14:11:25 +0000 (Fri, 20 May 2005)
New Revision: 6924

WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=6924

Log:
Remove some unused functions.

Modified:
   branches/SAMBA_4_0/source/build/smb_build/config_mk.pm


Changeset:
Modified: branches/SAMBA_4_0/source/build/smb_build/config_mk.pm
===================================================================
--- branches/SAMBA_4_0/source/build/smb_build/config_mk.pm	2005-05-20 14:08:06 UTC (rev 6923)
+++ branches/SAMBA_4_0/source/build/smb_build/config_mk.pm	2005-05-20 14:11:25 UTC (rev 6924)
@@ -238,206 +238,6 @@
 	return input::str2array($val);
 }
 
-###########################################################
-# A function for fetching MODULE_<module>_<parameter>
-# variables out of a config.mk file
-#
-# $value = module_get_var($filename,$module,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $module -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $value -	the value of the variable
-sub module_get_var($$$)
-{
-	my $filename = shift;
-	my $module = shift;
-	my $var = shift;
-
-	my $section = "MODULE::".$module;
-
-	return _fetch_var_from_config_mk($filename,$section,$var);
-}
-
-###########################################################
-# A function for fetching MODULE_<module>_<parameter>
-# variables out of a config.mk file
-#
-# $array = module_get_array($filename,$module,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $module -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $array -	the array of values of the variable
-sub module_get_array($$$)
-{
-	my $filename = shift;
-	my $module = shift;
-	my $var = shift;
-
-	my $section = "MODULE::".$module;
-
-	return _fetch_array_from_config_mk($filename,$section,$var);
-}
-
-###########################################################
-# A function for fetching SUBSYSTEM_<subsystem>_<parameter>
-# variables out of a config.mk file
-#
-# $value = subsystem_get_var($filename,$subsystem,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $subsystem -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $value -	the value of the variable
-sub subsystem_get_var($$$)
-{
-	my $filename = shift;
-	my $subsystem = shift;
-	my $var = shift;
-
-	my $section = "SUBSYSTEM::".$subsystem;
-
-	return _fetch_var_from_config_mk($filename,$section,$var);
-}
-
-###########################################################
-# A function for fetching SUBSYSTEM_<subsystem>_<parameter>
-# variables out of a config.mk file
-#
-# $array = subsystem_get_array($filename,$subsystem,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $subsystem -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $array -	the array of values of the variable
-sub subsystem_get_array($$$)
-{
-	my $filename = shift;
-	my $subsystem = shift;
-	my $var = shift;
-
-	my $section = "SUBSYSTEM::".$subsystem;
-
-	return _fetch_array_from_config_mk($filename,$section,$var);
-}
-
-###########################################################
-# A function for fetching LIBRARY_<library>_<parameter>
-# variables out of a config.mk file
-#
-# $value = library_get_var($filename,$library,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $library -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $value -	the value of the variable
-sub library_get_var($$$)
-{
-	my $filename = shift;
-	my $library = shift;
-	my $var = shift;
-
-	my $section = "LIBRARY::".$library;
-
-	return _fetch_var_from_config_mk($filename,$section,$var);
-}
-
-###########################################################
-# A function for fetching LIBRARY_<library>_<parameter>
-# variables out of a config.mk file
-#
-# $array = library_get_array($filename,$library,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $library -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $array -	the array of values of the variable
-sub library_get_array($$$)
-{
-	my $filename = shift;
-	my $library = shift;
-	my $var = shift;
-
-	my $section = "LIBRARY::".$library;
-
-	return _fetch_array_from_config_mk($filename,$section,$var);
-}
-
-###########################################################
-# A function for fetching BINARY_<binary>_<parameter>
-# variables out of a config.mk file
-#
-# $value = binary_get_var($filename,$binary,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $binary -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $value -	the value of the variable
-sub binary_get_var($$$)
-{
-	my $filename = shift;
-	my $binary = shift;
-	my $var = shift;
-
-	my $section = "BINARY::".$binary;
-
-	return _fetch_var_from_config_mk($filename,$section,$var);
-}
-
-###########################################################
-# A function for fetching BINARY_<binary>_<parameter>
-# variables out of a config.mk file
-#
-# $array = binary_get_array($filename,$binary,$parameter)
-#
-# $filename -	the path of the config.mk file
-#		which should be parsed
-#
-# $binary -	the middle part of the variable name of which we want the value
-#
-# $parameter -	the last part of the variable name of which we want the value
-#
-# $array -	the array of values of the variable
-sub binary_get_array($$$)
-{
-	my $filename = shift;
-	my $binary = shift;
-	my $var = shift;
-
-	my $section = "BINARY::".$binary;
-
-	return _fetch_array_from_config_mk($filename,$section,$var);
-}
-
 sub import_file($$)
 {
 	my $input = shift;