Remove DB query functions — migrate to fresh

CLAUDE.md

@@ -13,13 +13,11 @@ scale, compute coverage of areas of interest, and select minimum photo sets usin
 
 - One exported function per file: `R/fly_footprint.R` → `tests/testthat/test-fly_footprint.R`
 - `inst/testdata/` — Upper Bulkley River floodplain near Houston, BC (20 photos, dual scale)
-- `data-raw/make_testdata.R` — generates test data from airbc cached data
-- DB functions (`fly_query_habitat`, `fly_query_lakes`) require SSH tunnel; tests use `skip_if_no_db()`
+- `data-raw/make_testdata.R` — generates test data from diggs cached data
 
 ## Key Decisions
 
 - **CRS 3005** (BC Albers) not 32609 (UTM Zone 9) — works province-wide
-- **DBI/RPostgres in Suggests** — non-DB users don't need database drivers
 - **`fly_footprint()` uses vectorized `st_coordinates()` + `lapply()`** — do NOT use `dplyr::mutate(.data$geometry)` because the
 geometry column may be named `geom` not `geometry`
 - **Priority selection pattern:** all best-resolution photos first, then greedy backfill with coarser scales (see vignette)

DESCRIPTION

@@ -8,8 +8,7 @@ Authors@R: c(
     )
 Description: Estimate ground footprints from airphoto centroids and scale,
     compute coverage of areas of interest, and select minimum photo sets
-    using greedy set-cover. Includes optional helpers for querying fish
-    habitat streams from bcfishpass.
+    using greedy set-cover.
 License: MIT + file LICENSE
 URL: https://github.com/NewGraphEnvironment/fly,
     https://newgraphenvironment.github.io/fly/
@@ -22,14 +21,11 @@ Depends:
 Imports:
     sf,
     dplyr,
-    glue,
     purrr,
     rlang,
     stringr
 Suggests:
     bookdown,
-    DBI,
-    RPostgres,
     testthat (>= 3.0.0),
     knitr,
     rmarkdown

NAMESPACE

@@ -5,18 +5,14 @@ export(fly_fetch)
 export(fly_filter)
 export(fly_footprint)
 export(fly_overlap)
-export(fly_query_habitat)
-export(fly_query_lakes)
 export(fly_select)
 export(fly_summary)
 export(fly_thumb_georef)
-export(fly_trim_habitat)
 importFrom(rlang,"!!")
 importFrom(rlang,":=")
 importFrom(rlang,.data)
 importFrom(sf,sf_use_s2)
 importFrom(sf,st_area)
-importFrom(sf,st_as_sf)
 importFrom(sf,st_buffer)
 importFrom(sf,st_coordinates)
 importFrom(sf,st_crs)
@@ -27,9 +23,7 @@ importFrom(sf,st_intersects)
 importFrom(sf,st_make_valid)
 importFrom(sf,st_polygon)
 importFrom(sf,st_read)
-importFrom(sf,st_set_crs)
 importFrom(sf,st_sf)
 importFrom(sf,st_sfc)
 importFrom(sf,st_transform)
 importFrom(sf,st_union)
-importFrom(sf,st_zm)

R/fly-package.R

@@ -1,8 +1,7 @@
 #' @keywords internal
 #' @importFrom sf st_transform st_crs st_buffer st_union st_intersection
-#'   st_make_valid st_area st_geometry st_set_crs st_sfc st_polygon st_sf
-#'   st_drop_geometry st_read st_zm st_as_sf st_coordinates st_intersects
-#'   sf_use_s2
+#'   st_make_valid st_area st_geometry st_sfc st_polygon st_sf
+#'   st_drop_geometry st_read st_coordinates st_intersects sf_use_s2
 #' @importFrom rlang .data !! :=
 "_PACKAGE"