diff options
author | Norbert Preining <preining@logic.at> | 2009-07-30 14:12:16 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2009-07-30 14:12:16 +0000 |
commit | 7224071580baaad0937388994f5ba1f7ad89d089 (patch) | |
tree | 4de5b6cad15e768896819b927a96f6d9486561ce /Master/texmf | |
parent | 03ab3b6a7d6b750b00bc8d786e4b088385af53bb (diff) |
implement tlmgr conf matching texconfig conf
git-svn-id: svn://tug.org/texlive/trunk@14491 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 56 |
1 files changed, 56 insertions, 0 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 168ec0fe9d7..8442b8fa1c6 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -408,6 +408,9 @@ sub execute_action { } elsif ($action =~ m/^postaction$/i) { action_postaction(); finish(0); + } elsif ($action =~ m/^conf$/i) { + action_conf(); + finish(0); } elsif ($action =~ m/^show$/i) { action_show(); finish(0); @@ -3096,6 +3099,55 @@ sub action_postaction { } +# +# action conf +# tries to mimick texconfig conf but probably will add some more things +# +sub action_conf { + my $PATH = $ENV{'PATH'}; + info("=========================== version information ==========================\n"); + info(give_version()); + info("==================== binaries found by searching $PATH ===================\n"); + for my $cmd (qw/kpsewhich updmap fmtutil texconfig tex pdftex mktexpk dvips dvipdfm/) { + info("$cmd: " . TeXLive::TLUtils::which($cmd) . "\n"); + } + info("=========================== active config files ==========================\n"); + + for my $m (qw/texmf.cnf updmap.cfg fmtutil.cnf config.ps mktex.cnf pdftexconfig.tex/) { + info("$m: " . `kpsewhich $m`); + } + + tlwarn("missing finding of XDvi, config!\n"); + + info("============================= font map files =============================\n"); + for my $m (qw/psfonts.map pdftex.map ps2pk.map dvipdfm.map/) { + info("$m: " . `kpsewhich $m`); + } + + info("=========================== kpathsea variables ===========================\n"); + for my $v (qw/TEXMFMAIN TEXMFDIST TEXMFLOCAL TEXMFSYSVAR TEXMFSYSCONFIG TEXMFVAR TEXMFCONFIG TEXMFHOME VARTEXFONTS TEXMF SYSTEXMF TEXMFDBS WEB2C TEXPSHEADERS TEXCONFIG ENCFONTS TEXFONTMAPS/) { + info("$v=" . `kpsewhich -var-value=$v`); + } + + info("==== kpathsea variables from environment only (ok if no output here) ====\n"); + my @envVars = qw/ + AFMFONTS BIBINPUTS BSTINPUTS CMAPFONTS CWEBINPUTS ENCFONTS GFFONTS + GLYPHFONTS INDEXSTYLE LIGFONTS MFBASES MFINPUTS MFPOOL MFTINPUTS + MISCFONTS MPINPUTS MPMEMS MPPOOL MPSUPPORT OCPINPUTS OFMFONTS + OPENTYPEFONTS OPLFONTS OTPINPUTS OVFFONTS OVPFONTS PDFTEXCONFIG PKFONTS + PSHEADERS SFDFONTS T1FONTS T1INPUTS T42FONTS TEXBIB TEXCONFIG TEXDOCS + TEXFONTMAPS TEXFONTS TEXFORMATS TEXINDEXSTYLE TEXINPUTS TEXMFCNF + TEXMFDBS TEXMFINI TEXMFSCRIPTS TEXPICTS TEXPKS TEXPOOL TEXPSHEADERS + TEXSOURCES TFMFONTS TRFONTS TTFONTS VFFONTS WEB2C WEBINPUTS + /; + for my $v (@envVars) { + if (defined($ENV{$v})) { + info("$v=$ENV{$v}\n"); + } + } +} + + # Subroutines galore. # # set global $location variable. @@ -3792,6 +3844,10 @@ The C<--> avoids having the C<-1> treated as an option. (In general, C<--> stops parsing for arguments at the point where it appears; this is a general feature of option parsing.) +=head2 conf + +This option to tlmgr mimicks the B<texconfig conf> call, but works on +all supported platforms. =head2 path [add|remove] |