diff options
author | Norbert Preining <preining@logic.at> | 2007-11-22 03:17:37 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2007-11-22 03:17:37 +0000 |
commit | 66a9535de0f9089248fcdfe28a7041f92d25cd6e (patch) | |
tree | 28ba5ce2778e70bb8405e64e1a0499f4aaf09c02 /Master/tlpkg/bin/tlpsrc2tlpdb | |
parent | 705aa6c16727ba02f401de3c2778a421bddc3288 (diff) |
implement bin file splitting into seperate packages
git-svn-id: svn://tug.org/texlive/trunk@5542 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tlpsrc2tlpdb')
-rwxr-xr-x | Master/tlpkg/bin/tlpsrc2tlpdb | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/tlpsrc2tlpdb b/Master/tlpkg/bin/tlpsrc2tlpdb index 686bab6bd9b..173fb554725 100755 --- a/Master/tlpkg/bin/tlpsrc2tlpdb +++ b/Master/tlpkg/bin/tlpsrc2tlpdb @@ -28,11 +28,13 @@ my $opt_catalogue = ""; chomp (my $opt_master = `cd $::mydir/../.. && pwd`); our $opt_debug = 0; my $help = 0; +my $opt_nosplit = 0; GetOptions( "all!" => \$opt_all, "master=s" => \$opt_master, # location of the TL tree "catalogue=s" => \$opt_catalogue, # location of the TeX Catalogue + "nosplit!" => \$opt_nosplit, "debug!", "help|?" => \$help) or pod2usage(1); pod2usage(-exitstatus => 0, -verbose => 2) if $help; @@ -87,7 +89,14 @@ sub main # merge TeX Catalogue information $tlp->update_from_catalogue ($tlc); } - + + # split bin packages + if (not($opt_nosplit)) { + my @binobjs = $tlp->split_package; + foreach (@binobjs) { + $tldb->add_tlpobj($_); + } + } $tldb->add_tlpobj ($tlp); } warn "\n"; @@ -134,6 +143,11 @@ gathered from the TeX Catalogue. The location given by B<-master> must point to a valid svn repository of TeX Live's Master direcory. Defaults to C<../..> of C<$0>. +=item B<-nosplit> +Do NOT split files with binaries into several packages, one for the arch +independent and one for each of the architectures with only the respective +binaries. + =back The standard options C<-help> and C<-debug> are also accepted. |