From e2ae1a828612faee9f4e8f2e34f55586fa8c377b Mon Sep 17 00:00:00 2001
From: vincents <vincents@lazarus-ide.org>
Date: Mon, 31 Oct 2005 12:33:13 +0000
Subject: [PATCH] fixed compilation with fpc 2.1.1

git-svn-id: trunk@8016 -
---
 packager/pkgmanager.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/packager/pkgmanager.pas b/packager/pkgmanager.pas
index 4aa5255f14..152c390428 100644
--- a/packager/pkgmanager.pas
+++ b/packager/pkgmanager.pas
@@ -3008,7 +3008,7 @@ begin
   // append registration code only for design time packages
   if (APackage.PackageType in [lptDesignTime,lptRunAndDesignTime]) then begin
     RegistrationCode:=
-      +'procedure Register;'+e
+      'procedure Register;'+e
       +'begin'+e
       +RegistrationCode
       +'end;'+e
@@ -3035,7 +3035,7 @@ begin
       +'uses'+e
       +'  '+UsedUnits+';'+e
       +e;
-  Src:=Src+
+  Src:=Src
       +'implementation'+e
       +e
       +RegistrationCode