diff options
| author | Norbert Preining <preining@logic.at> | 2009-07-01 00:58:23 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2009-07-01 00:58:23 +0000 |
| commit | 17df465a2b2e511e4d540339804fff1bb1ea37a8 (patch) | |
| tree | 4e1a32c135560a9b85a77c4e54f8f1f97c008444 /Master/tlpkg/tlpostcode | |
| parent | 72b19c9bac28d3e5465799f42935d07b5d7e761d (diff) | |
removing texworks postaction texworks.pl, and activate the desktop link
for texworks
git-svn-id: svn://tug.org/texlive/trunk@14039 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlpostcode')
| -rw-r--r-- | Master/tlpkg/tlpostcode/texworks.pl | 41 |
1 files changed, 0 insertions, 41 deletions
diff --git a/Master/tlpkg/tlpostcode/texworks.pl b/Master/tlpkg/tlpostcode/texworks.pl deleted file mode 100644 index af0937a94e9..00000000000 --- a/Master/tlpkg/tlpostcode/texworks.pl +++ /dev/null @@ -1,41 +0,0 @@ -# $Id$ -# post action for texworks -# Copyright 2009 Norbert Preining -# This file is licensed under the GNU General Public License version 2 -# or any later version. - -my $texdir; -my $mode; - -BEGIN { - $^W = 1; - $mode = $ARGV[0]; - $texdir = $ARGV[1]; - # make Perl find our packages first: - unshift (@INC, "$texdir/tlpkg"); -} - -use TeXLive::TLUtils qw(win32 mkdirhier conv_to_w32_path log info tlwarn); - -if ($mode eq "install") { - for my $f (<$texdir/bin/*>) { - next if ! -d $f; - open (TWI, ">$f/texworks-setup.ini") - || tlwarn "Cannot open $f/texworks-setup.ini"; - print TWI "defaultbinpaths = $f\n"; - close TWI; - } -} elsif ($mode eq "remove") { - unlink <$texdir/bin/texworks-setup.ini>; -} else { - tlwarn ("texworks post action: unknown mode $mode\n"); -} - -exit 0; - -### Local Variables: -### perl-indent-level: 2 -### tab-width: 2 -### indent-tabs-mode: nil -### End: -# vim:set tabstop=2 expandtab: # |