summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tl-update-install-pkg.pat
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin/tl-update-install-pkg.pat')
-rw-r--r--Master/tlpkg/bin/tl-update-install-pkg.pat62
1 files changed, 62 insertions, 0 deletions
diff --git a/Master/tlpkg/bin/tl-update-install-pkg.pat b/Master/tlpkg/bin/tl-update-install-pkg.pat
new file mode 100644
index 00000000000..54d92dd09cb
--- /dev/null
+++ b/Master/tlpkg/bin/tl-update-install-pkg.pat
@@ -0,0 +1,62 @@
+*** tl-update-install-pkg 2009-10-10 01:54:07.000000000 +0200
+--- tl-update-install-pkg-new 2013-03-13 18:33:44.000000000 +0100
+***************
+*** 1,7 ****
+ #!/usr/bin/env perl
+ # $Id: tl-update-install-pkg 15732 2009-10-09 23:54:07Z karl $
+ #
+! # Copyright 2008, 2009 Reinhard Kotucha, Norbert Preining, Karl Berry
+ # This file is licensed under the GNU General Public License version 2
+ # or any later version.
+
+--- 1,7 ----
+ #!/usr/bin/env perl
+ # $Id: tl-update-install-pkg 15732 2009-10-09 23:54:07Z karl $
+ #
+! # Copyright 2008, 2009, 2013 Reinhard Kotucha, Norbert Preining, Karl Berry
+ # This file is licensed under the GNU General Public License version 2
+ # or any later version.
+
+***************
+*** 159,165 ****
+ }
+
+ my @win32 = ();
+! push (@win32, @unix);
+ if (defined $tlpbin{"win32"}) {
+ push (@win32, @{$tlpbin{"win32"}});
+ }
+--- 159,165 ----
+ }
+
+ my @win32 = ();
+! #push (@win32, @unix); # is this necessary?
+ if (defined $tlpbin{"win32"}) {
+ push (@win32, @{$tlpbin{"win32"}});
+ }
+***************
+*** 171,176 ****
+--- 171,177 ----
+
+ copy_files (@win32);
+ make_zip ("zip");
++ make_zip ("nsis");
+
+ install_files ();
+
+***************
+*** 205,210 ****
+--- 206,218 ----
+ chdir ($tmpdir) || die "chdir($tmpdir) failed: $!";
+ if ($type eq 'zip') {
+ system ('zip', '-rq', 'install-tl.zip', $install_tl_name);
++ } elsif ($type eq 'nsis') {
++ # write include file for dated install directory
++ system ("echo !define YYYYMMDD '$YYYYMMDD' >\"$tmpdir/tlsubdir.nsh\"");
++ system ("echo !define INST_TL_NAME '$install_tl_name' >>\"$tmpdir/tlsubdir.nsh\"");
++ copy ("$::installerdir/tlpkg/bin/install-tl.nsi", $tmpdir);
++ copy ("$::installerdir/tlpkg/bin/isadmin_q.cmd", $tmpdir);
++ system ('makensis', 'install-tl');
+ } else {
+ system ('tar', '-czf', 'install-tl-unx.tar.gz', $install_tl_name);
+ }