From cc32bc6f67d145f20c7a45b0127e50810dbd5923 Mon Sep 17 00:00:00 2001
From: Andrew Gene Brown <brown.andrewg@gmail.com>
Date: Tue, 21 Nov 2023 00:33:46 -0800
Subject: [PATCH] typo

---
 R/gpkg_bbox.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/gpkg_bbox.R b/R/gpkg_bbox.R
index 8d62457..2aaea83 100644
--- a/R/gpkg_bbox.R
+++ b/R/gpkg_bbox.R
@@ -21,11 +21,11 @@
 #' gpkg_bbox(g, 'bbox')
 #' }
 gpkg_bbox <- function(x, table_name, geom_column = "geom") {
-  as.data.frame(gpkg_ogr_query(x, paste0(gsub("geom", geom_column,
+  as.data.frame(gpkg_ogr_query(x, paste(gsub("geom", geom_column,
                                               "SELECT 
                                                  ST_MinX(geom) AS xmin,
                                                  ST_MinY(geom) AS ymin,
                                                  ST_MaxX(geom) AS xmax,
                                                  ST_MaxY(geom) AS ymax
-                                               FROM ", table_name))))
+                                               FROM"), table_name)))
 }
\ No newline at end of file