From 0b3003fb78ec35debf036c40409157888f519e33 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 25 Mar 2005 21:22:30 +0000
Subject: [PATCH]   - removed unused variables

---
 compiler/utils/fpcsubst.pp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/utils/fpcsubst.pp b/compiler/utils/fpcsubst.pp
index ba2ad5abef..db051a5f6e 100644
--- a/compiler/utils/fpcsubst.pp
+++ b/compiler/utils/fpcsubst.pp
@@ -126,8 +126,8 @@ end;
 Procedure ProcessCommandline;
 
 Var
-  I,P,l : Integer;
-  T,S : String;
+  I : Integer;
+  S : String;
 
   Function GetOptArg : String;