Update of /cvsroot/leaf/src/bering-uclibc4/buildtool
In directory sfp-cvsdas-2.v30.ch3.sourceforge.com:/tmp/cvs-serv9735
Modified Files:
buildpacket.pl
Log Message:
Added new file type - 'module', this file will be ignored during backup.
Index: buildpacket.pl
===================================================================
RCS file: /cvsroot/leaf/src/bering-uclibc4/buildtool/buildpacket.pl,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** buildpacket.pl 26 Apr 2010 09:03:14 -0000 1.1.1.1
--- buildpacket.pl 16 May 2010 22:33:03 -0000 1.2
***************
*** 358,361 ****
--- 358,390 ----
}
+ # packageModules($config)
+ #
+ # Returns the contents of the .modules file of the package
+ sub packageModules($) {
+ my ($p_h_packageConfig) = @_;
+ my $file ;
+
+ print "Generating package local file\n" if $verbose;
+ my $p_m_files = [];
+
+ foreach my $p_h_file (@{$p_h_packageConfig->{'contents'}->{'file'}}) {
+
+ next unless exists($p_h_file->{'type'}->{'MODULE'});
+ my $filename = $p_h_file->{'filename'};
+
+ # # turn the filename into an absolute path (if necessary)
+ # if (!File::Spec->file_name_is_absolute($filename)) {
+ # $filename =
File::Spec->catfile(File::Spec->rootdir(),$filename);
+ # }
+
+ # push(@{$p_l_files},'I ' .$filename)
+ push(@{$p_m_files},$filename)
+ }
+
+
+
+ return join("\n", @{$p_m_files});
+
+ }
sub prepareTempDir($$$)
***************
*** 704,707 ****
--- 733,742 ----
) unless $str eq '';
+ $str = packageModules($p_h_package);
+ writeToFile(File::Spec->catfile($destDir, $p_h_package->{'packagename'}
. ".modules"),
+ $str . "\n"
+ ) unless $str eq '';
+
+
# $str = packageList($p_h_package,
$p_h_package_contents,$p_h_package->{'packagename'});
# writeToFile(File::Spec->catfile($destDir, $p_h_package->{'packagename'}
. ".list"),
------------------------------------------------------------------------------
_______________________________________________
leaf-cvs-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/leaf-cvs-commits
