Merge pull request #282 from jmaspons/fix-opq_osm_id

Fix opq_osm_id for more than 1 id
ropensci · Nov 28, 2022 · 30d65f7 · 30d65f7
2 parents 39d7994 + e4a5c9f
commit 30d65f7
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 6 deletions.
diff --git a/R/opq.R b/R/opq.R
@@ -553,12 +553,9 @@ opq_osm_id <- function (id = NULL, type = NULL, open_url = FALSE) {
     if (!(is.character (id) | storage.mode (id) == "double")) {
         stop ("id must be character or numeric.")
     }
-    if (length (id) != 1L) {
-        stop ("Only a single id may be entered.")
-    }
 
     if (!is.character (id)) {
-        id <- paste0 (id)
+        id <- as.character(id)
     }
 
     opq <- opq (1:4)

diff --git a/tests/testthat/test-opq.R b/tests/testthat/test-opq.R
@@ -129,9 +129,9 @@ test_that ("opq_osm_id", {
         opq_osm_id (type = "node", id = 1L),
         "id must be character or numeric."
     )
-    expect_error (
+    expect_s3_class (
         opq_osm_id (type = "node", id = 1:2 + 0.1),
-        "Only a single id may be entered."
+        "overpass_query"
     )
     expect_identical(
       opq_osm_id (type = "node", id = 123456),