diff options
Diffstat (limited to 'gettext-tools/src/x-lisp.c')
| -rw-r--r-- | gettext-tools/src/x-lisp.c | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/gettext-tools/src/x-lisp.c b/gettext-tools/src/x-lisp.c index 2617b21..f903b55 100644 --- a/gettext-tools/src/x-lisp.c +++ b/gettext-tools/src/x-lisp.c @@ -860,7 +860,7 @@ comment_line_end (size_t chars_to_remove) buffer = xrealloc (buffer, bufmax); } buffer[buflen] = '\0'; - xgettext_comment_add (buffer); + savable_comment_add (buffer); } @@ -954,7 +954,7 @@ read_object (struct object *op, flag_context_ty outer_context) precede it, with no non-whitespace token on a line between both. */ if (last_non_comment_line > last_comment_line) - xgettext_comment_reset (); + savable_comment_reset (); continue; case syntax_illegal: @@ -1100,8 +1100,10 @@ read_object (struct object *op, flag_context_ty outer_context) pos.file_name = logical_file_name; pos.line_number = inner.line_number_at_start; + savable_comment_to_xgettext_comment (savable_comment); mp = remember_a_message (mlp, string_of_object (&inner), inner_context, &pos); + savable_comment_reset (); if (argnum2 > 0) plural_mp = mp; } @@ -1114,8 +1116,10 @@ read_object (struct object *op, flag_context_ty outer_context) pos.file_name = logical_file_name; pos.line_number = inner.line_number_at_start; + savable_comment_to_xgettext_comment (savable_comment); remember_a_message_plural (plural_mp, string_of_object (&inner), inner_context, &pos); + savable_comment_reset (); } } } @@ -1215,8 +1219,10 @@ read_object (struct object *op, flag_context_ty outer_context) pos.file_name = logical_file_name; pos.line_number = op->line_number_at_start; + savable_comment_to_xgettext_comment (savable_comment); remember_a_message (mlp, string_of_object (op), null_context, &pos); + savable_comment_reset (); } last_non_comment_line = line_number; return; |