summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlpostcode
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-07-01 00:58:23 +0000
committerNorbert Preining <preining@logic.at>2009-07-01 00:58:23 +0000
commit17df465a2b2e511e4d540339804fff1bb1ea37a8 (patch)
tree4e1a32c135560a9b85a77c4e54f8f1f97c008444 /Master/tlpkg/tlpostcode
parent72b19c9bac28d3e5465799f42935d07b5d7e761d (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.pl41
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: #