diff --git a/src/mormot.commit.inc b/src/mormot.commit.inc
index 2c603c10b..00cf1121e 100644
--- a/src/mormot.commit.inc
+++ b/src/mormot.commit.inc
@@ -1 +1 @@
-'2.1.5543'
+'2.1.5544'
diff --git a/src/ui/mormot.ui.pdf.pas b/src/ui/mormot.ui.pdf.pas
index 44015be21..6416a77d2 100644
--- a/src/ui/mormot.ui.pdf.pas
+++ b/src/ui/mormot.ui.pdf.pas
@@ -4850,6 +4850,8 @@ function TPdfWrite.AddEscape(Text: PAnsiChar; TextLen: integer): TPdfWrite;
     #1..#31, '%', '(', ')', '<', '>', '[', ']', '{', '}', '/', '#', #127..#255];
 
 function TPdfWrite.AddEscapeName(Text: PAnsiChar): TPdfWrite;
+var
+  c: cardinal;
 begin
   if Text <> nil then
     repeat