diff options
Diffstat (limited to 'Master/tlpkg/bin/tlpsrc2tlpdb')
-rwxr-xr-x | Master/tlpkg/bin/tlpsrc2tlpdb | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/tlpsrc2tlpdb b/Master/tlpkg/bin/tlpsrc2tlpdb index 1b7f75924d4..75490bc1aa9 100755 --- a/Master/tlpkg/bin/tlpsrc2tlpdb +++ b/Master/tlpkg/bin/tlpsrc2tlpdb @@ -30,6 +30,7 @@ chomp (my $opt_master = `cd $::mydir/../.. && pwd`); my $help = 0; my $opt_nobinsplit = 0; my $opt_winwarning; +my $opt_fromfiles = 0; TeXLive::TLUtils::process_logging_options(); GetOptions( @@ -37,6 +38,7 @@ GetOptions( "master=s" => \$opt_master, # location of the TL tree "catalogue=s" => \$opt_catalogue, # location of the TeX Catalogue "no-bin-split!" => \$opt_nobinsplit, + "from-files" => \$opt_fromfiles, "with-win-pattern-warning" => \$opt_winwarning, "help|?" => \$help) or pod2usage(1); pod2usage(-exitstatus => 0, -verbose => 2) if $help; @@ -70,7 +72,11 @@ sub main info ("$0: reading Master $opt_master ...\n"); my $tltree = TeXLive::TLTREE->new ("svnroot" => $opt_master); - $tltree->init_from_svn; + if ($opt_fromfiles) { + $tltree->init_from_files; + } else { + $tltree->init_from_svn; + } info ("$0: updating from tlpsrc ...\n"); my $tldb = TeXLive::TLPDB->new; @@ -172,6 +178,9 @@ file, but does I<not> warn for binpatterns when working on the win32 architecture. Giving this option makes it issues all warnings, i.e., also those where a binpattern on win32 does not hit. +=item B<-from-files> +Use find instead of svn -status to create the list of files. + =back The standard options C<-help> and C<-debug> are also accepted. |