Fix current page calculation

Change-Id: I05ac9cc5d003c7721571718547b07be20bfa7836
diff --git a/R/KorAPQuery.R b/R/KorAPQuery.R
index 15c742c..230eb24 100644
--- a/R/KorAPQuery.R
+++ b/R/KorAPQuery.R
@@ -237,7 +237,7 @@
     return(kqo)
   }
 
-  page <- 1
+  page <- kqo@nextStartIndex / maxResultsPerPage + 1
   results <- 0
   pubDate <- NULL # https://stackoverflow.com/questions/8096313/no-visible-binding-for-global-variable-note-in-r-cmd-check
   collectedMatches <- kqo@collectedMatches