diff --git a/utils/pas2js/webidl2pas.pp b/utils/pas2js/webidl2pas.pp
index 16e88ad105..ec78535294 100644
--- a/utils/pas2js/webidl2pas.pp
+++ b/utils/pas2js/webidl2pas.pp
@@ -130,9 +130,8 @@ end;
 function TWebIDLToPasApplication.ConfigWebIDLToPas : Boolean;
 
 var
-  A,ErrorMsg: String;
+  A: String;
   I : Integer;
-  ok: Boolean;
   L : TStrings;
 
 begin