diff options
author | Norbert Preining <preining@logic.at> | 2016-05-18 07:41:10 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2016-05-18 07:41:10 +0000 |
commit | 928bda19a77562cec324295400f148bb856887a3 (patch) | |
tree | 017499f300246dcc18e0ac34b0a417111bdc9883 | |
parent | 1f82ae59ed206ef25f231716108aa1b0de73fbf9 (diff) |
ptex2pdf post: fix my stupidity
git-svn-id: svn://tug.org/texlive/trunk@41234 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Master/tlpkg/tlpostcode/ptex2pdf-tlpost.pl | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/Master/tlpkg/tlpostcode/ptex2pdf-tlpost.pl b/Master/tlpkg/tlpostcode/ptex2pdf-tlpost.pl index 55f4f6d9d18..1a091d38aa1 100644 --- a/Master/tlpkg/tlpostcode/ptex2pdf-tlpost.pl +++ b/Master/tlpkg/tlpostcode/ptex2pdf-tlpost.pl @@ -152,16 +152,16 @@ my %original = ( }, ); -if ($::lang ne 'ja') { - # not adjusting TeXworks for ptex2pdf - exit(0); -} - $::lang = "C"; require TeXLive::TLWinGoo; require("TeXLive/trans.pl"); #use Data::Dumper; +if ($::lang ne 'ja') { + # not adjusting TeXworks for ptex2pdf + exit(0); +} + if ($mode eq 'install') { do_install(); } elsif ($mode eq 'remove') { @@ -186,6 +186,7 @@ sub do_install { } else { $toolsdir = $ENV{'HOME'} . "/.TeXworks/configuration"; } + # print "toolsdir = $toolsdir\n"; my $tools = "$toolsdir/tools.ini"; my $highest_entry = 0; if (-r $tools) { |