Add missed code

HealthIntersections · Aug 15, 2024 · cadbe8a · cadbe8a
1 parent 8f172c8
commit cadbe8a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/library/ftx/fhir_codesystem_service.pas b/library/ftx/fhir_codesystem_service.pas
@@ -1910,7 +1910,7 @@ function TFHIRCodeSystemManager.link: TFHIRCodeSystemManager;
 
 function escapeUrl(url : String) : String;
 begin
-  result := url.replace('|', '');
+  result := url.replace('|', '%7C');
 end;
 
 procedure TFHIRCodeSystemManager.see(r : TFHIRCodeSystemEntry);
@@ -2163,7 +2163,7 @@ procedure TFHIRCodeSystemManager.drop(id : String);
         if (mm <> '') then
           FMap.remove(res.url+'|'+mm);
       end;
-      updateList(res.url, res.version);
+      updateList(escapeUrl(res.url), res.version);
     finally
       res.free;
     end;