From 7928345fb386efc4989bed8edb531fc5f83c3cd5 Mon Sep 17 00:00:00 2001 From: balazs Date: Thu, 30 Mar 2017 05:03:58 +0000 Subject: [PATCH] Opkman: Fixed bug in package update. git-svn-id: trunk@54500 - --- components/onlinepackagemanager/opkman_updates.pas | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/components/onlinepackagemanager/opkman_updates.pas b/components/onlinepackagemanager/opkman_updates.pas index 04e1b7c985..eaf7eb75c4 100644 --- a/components/onlinepackagemanager/opkman_updates.pas +++ b/components/onlinepackagemanager/opkman_updates.pas @@ -479,8 +479,14 @@ begin begin MS.Position := 0; SetLength(AJSON, MS.Size); + MS.Read(Pointer(AJSON)^, Length(AJSON)); Result := Length(AJSON) > 0; + {since the class name has changed form "UpdatePackageFiles" to "UpdateLazPackages", + we have to replace the references in the old JSONs(we don't have access to the files, they are + located at the developers update page.} + if Result then + AJSON := StringReplace(AJSON, 'UpdatePackageFiles', 'UpdateLazPackages', [rfReplaceAll, rfIgnoreCase]); end; end; except