From 8752d483cc2b03fe173c744a832aca427d398e2c Mon Sep 17 00:00:00 2001
From: lazarus <lazarus@lazarus-ide.org>
Date: Mon, 11 Mar 2002 09:43:45 +0000
Subject: [PATCH] Keith: Fixed Win32 compilation problem.

git-svn-id: trunk@1500 -
---
 components/codetools/definetemplates.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/codetools/definetemplates.pas b/components/codetools/definetemplates.pas
index dcba3f7929..f5a44324b1 100644
--- a/components/codetools/definetemplates.pas
+++ b/components/codetools/definetemplates.pas
@@ -1568,7 +1568,7 @@ var
           // template for a sub directory
           {$ifdef win32}
           if CurPath='' then
-            SubPath:=ReadValue(DefTempl.Value,CurValue)
+            SubPath:=ReadValue(DefTempl.Value,CurPath)
           else
             SubPath:=CurPath+PathDelim+ReadValue(DefTempl.Value,CurPath);
           {$else}