From ffc2238defb3c955f43d55358140fa016a3948d1 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Tue, 17 Jul 2018 07:52:46 +0000
Subject: [PATCH] * Avoid extra load at EOF if no pages are used

---
 packages/fcl-db/restconnection.pas | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/packages/fcl-db/restconnection.pas b/packages/fcl-db/restconnection.pas
index aaaa01c..3854cfc 100644
--- a/packages/fcl-db/restconnection.pas
+++ b/packages/fcl-db/restconnection.pas
@@ -281,9 +281,14 @@ begin
     end
   else
     begin
-    R.FXHR.open('GET',URL,true);
-    R.FXHR.send;
-    Result:=True;
+    if (loAtEOF in R.LoadOptions) and (Connection.PageParam='') then
+      R.Success:=rrEOF
+    else
+      begin
+      R.FXHR.open('GET',URL,true);
+      R.FXHR.send;
+      Result:=True;
+      end;
     end;
 end;