On 5/26/2019 2:26 PM, Marcel Fabian Krüger wrote:
Hi,
according to the documentation find_{output,write}_file should return
the name of the to be written file. Currently this is mostly ignored and
the original name is always used. Here is a patch to fix this.
Best regards,
Marcel Krüger
---
source/texk/web2c/luatexdir/tex/texfileio.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/source/texk/web2c/luatexdir/tex/texfileio.c
b/source/texk/web2c/luatexdir/tex/texfileio.c
index 143e694e1..158757080 100644
--- a/source/texk/web2c/luatexdir/tex/texfileio.c
+++ b/source/texk/web2c/luatexdir/tex/texfileio.c
@@ -347,7 +347,7 @@ boolean lua_a_open_out(alpha_file * f, char *fn, int n)
messaging is left to \LUA\ then.
*/
- ret = open_outfile(f, fn, FOPEN_W_MODE);
+ ret = open_outfile(f, str_string(fnam), FOPEN_W_MODE);
}
} else {
if (openoutnameok(fn)) {
@@ -379,7 +379,7 @@ boolean lua_b_open_out(alpha_file * f, char *fn)
fnam = 0;
test = run_callback(callback_id, "S->s", fn, &fnam);
if ((test) && (fnam != 0) && (str_length(fnam) > 0)) {
- ret = open_outfile(f, fn, FOPEN_WBIN_MODE);
+ ret = open_outfile(f, str_string(fnam), FOPEN_WBIN_MODE);
}
} else {
if (openoutnameok(fn)) {
indeed a bug but the solution is a bit different as we can avoid going
via the string pool
Hans
-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-----------------------------------------------------------------
_______________________________________________
dev-luatex mailing list
dev-luatex@ntg.nl
https://mailman.ntg.nl/mailman/listinfo/dev-luatex
