diff options
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/texmf-dist/scripts/texlive/tlmgr.pl | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index 00ed88622ad..c31818d8a9e 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -4409,7 +4409,7 @@ sub action_platform { sub action_generate { if ($opts{"usermode"}) { tlwarn("action `generate' not supported in usermode!\n"); - exit 1; + return $F_ERROR; } my $what = shift @ARGV; init_local_db(); @@ -4491,6 +4491,12 @@ sub action_generate { } } elsif ($what =~ m/^fmtutil$/i) { + tlwarn("$prg: generate fmtutil is no longer needed or supported.\n"); + tlwarn("$prg: Please read the documentation of the `fmtutil' program.\n"); + tlwarn("$prg: Goodbye.\n"); + return $F_ERROR; + + } elsif ($what =~ m/^_fmtutil$/i) { my $dest = $opts{"dest"} || "$TEXMFDIST/web2c/fmtutil.cnf"; debug("$prg: writing new fmtutil.cnf to $dest\n"); TeXLive::TLUtils::create_fmtutil($localtlpdb, $dest); @@ -4506,7 +4512,7 @@ sub action_generate { tlwarn("$prg: generate updmap is no longer needed or supported.\n"); tlwarn("$prg: Please read the documentation of the `updmap' program.\n"); tlwarn("$prg: Goodbye.\n"); - exit(1); + return $F_ERROR; } elsif ($what =~ m/^_updmap$/i) { my $dest = $opts{"dest"} || "$TEXMFDIST/web2c/updmap.cfg"; @@ -4521,10 +4527,11 @@ sub action_generate { } } else { - die "$prg: Unknown option for generate: $what; try --help if you need it.\n"; + tlwarn("$prg: Unknown option for generate: $what; try --help if you need it.\n"); + return $F_ERROR; } - return; + return $F_OK; } |