diff --git a/R/finbif_occurrence.R b/R/finbif_occurrence.R
index 38d39a35..30b0bbe4 100644
--- a/R/finbif_occurrence.R
+++ b/R/finbif_occurrence.R
@@ -178,9 +178,9 @@ occurrence <- function(fb_records_obj) {
     fb_records_obj[["taxa"]], fb_records_obj[["filter"]]
   )
 
-  cache <- as.list(
-    c(fb_records_obj[["cache"]], getOption("finbif_use_cache_metadata"))
-  )
+  cache <- as.list(fb_records_obj[["cache"]])
+
+  cache <- c(cache, getOption("finbif_use_cache_metadata"))
 
   fb_records_obj[["cache"]] <- cache[1:2]