summaryrefslogtreecommitdiff
path: root/Build/source/texk/kpathsea
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2009-11-14 14:49:02 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2009-11-14 14:49:02 +0000
commitef09daffde3b9493f973abcda6c7be69bd6a26f0 (patch)
treee010b819675684ede9e8e505327ed3e86a6133fd /Build/source/texk/kpathsea
parentf108f9d07bb85a78e232fd7bb8dab5ac5a4621c1 (diff)
misc updates
git-svn-id: svn://tug.org/texlive/trunk@16015 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/kpathsea')
-rw-r--r--Build/source/texk/kpathsea/ChangeLog5
-rw-r--r--Build/source/texk/kpathsea/tex-file.c11
2 files changed, 12 insertions, 4 deletions
diff --git a/Build/source/texk/kpathsea/ChangeLog b/Build/source/texk/kpathsea/ChangeLog
index c3267be31c0..86f0b66a105 100644
--- a/Build/source/texk/kpathsea/ChangeLog
+++ b/Build/source/texk/kpathsea/ChangeLog
@@ -1,3 +1,8 @@
+2009-11-14 Peter Breitenlohner <peb@mppmu.mpg.de>
+
+ * tex-file.c (kpathsea_out_name_ok): Allow writing of .pl files.
+ From Akira Kakuto <kakuto@fuk.kindai.ac.jp>.
+
2009-11-13 Peter Breitenlohner <peb@mppmu.mpg.de>
* tex-file.c (kpathsea_out_name_ok): On Windows disallow writing
diff --git a/Build/source/texk/kpathsea/tex-file.c b/Build/source/texk/kpathsea/tex-file.c
index bd29b7504b2..f34f58924e8 100644
--- a/Build/source/texk/kpathsea/tex-file.c
+++ b/Build/source/texk/kpathsea/tex-file.c
@@ -1182,6 +1182,9 @@ Isspace (char c)
return (c == ' ' || c == '\t');
}
+/* Create a list of executable suffixes of files not to be written. */
+#define EXE_SUFFIXES ".com;.exe;.bat;.cmd;.vbs;.vbe;.js;.jse;.wsf;.wsh;.ws;.tcl;.py;.pyw"
+
static void
mk_suffixlist (char ***ext)
{
@@ -1190,15 +1193,15 @@ mk_suffixlist (char ***ext)
int n;
#if defined(__CYGWIN__)
- v = (char *) xmalloc (71);
- strcpy (v, ".com;.exe;.bat;.cmd;.vbs;.vbe;.js;.jse;.wsf;.wsh;.ws;.tcl;.py;.pyw;.pl");
+ v = (char *) xmalloc (strlen (EXE_SUFFIXES) + 1);
+ strcpy (v, EXE_SUFFIXES);
#else
v = (char *) getenv ("PATHEXT");
if (v) /* strlwr() exists also in MingW */
(void) strlwr (v);
else {
- v = (char *) xmalloc (71);
- strcpy (v, ".com;.exe;.bat;.cmd;.vbs;.vbe;.js;.jse;.wsf;.wsh;.ws;.tcl;.py;.pyw;.pl");
+ v = (char *) xmalloc (strlen (EXE_SUFFIXES) + 1);
+ strcpy (v, EXE_SUFFIXES);
}
#endif