From 62e3b84b92e5c5c213046ce5b66079a074d368ce Mon Sep 17 00:00:00 2001 From: Bruno Haible Date: Thu, 3 Jul 2025 12:50:15 +0200 Subject: [PATCH] xgettext: Fix bug with syntax-checks on messages from Perl source code. * gettext-tools/src/x-perl.c (extract_perl): Don't free logical_file_name, because it is referenced by the 'pos' field of the returned messages, and xg-check.c accesses and prints it. --- gettext-tools/src/x-perl.c | 1 - 1 file changed, 1 deletion(-) diff --git a/gettext-tools/src/x-perl.c b/gettext-tools/src/x-perl.c index fb254d9f8..d3aa50476 100644 --- a/gettext-tools/src/x-perl.c +++ b/gettext-tools/src/x-perl.c @@ -3885,6 +3885,5 @@ extract_perl (FILE *f, const char *real_filename, const char *logical_filename, token_stack_free (&xp->token_stack); free (xp); real_file_name = NULL; - free (logical_file_name); logical_file_name = NULL; } -- 2.47.3