From f09ee6c69d295c3206e44c968a58dc03a6f53fd7 Mon Sep 17 00:00:00 2001
From: Bruno Haible <bruno@clisp.org>
Date: Sun, 11 May 2025 03:27:45 +0200
Subject: [PATCH] Refactor: Fix a compiler warning.

* gettext-tools/src/x-perl.c: Remove a stray ';'.
---
 gettext-tools/src/x-perl.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gettext-tools/src/x-perl.c b/gettext-tools/src/x-perl.c
index d286b10c1..fb254d9f8 100644
--- a/gettext-tools/src/x-perl.c
+++ b/gettext-tools/src/x-perl.c
@@ -338,7 +338,7 @@ perl_extractor_init_rest (struct perl_extractor *xp)
   xp->token_stack.items = NULL;
   xp->token_stack.nitems = 0;
   xp->token_stack.nitems_max = 0;
-};
+}
 
 
 /* ======================== Reading of characters.  ======================== */