avoid warnings while checking for which editor to use

r-spatial · Jul 4, 2019 · 4112a08 · 4112a08
1 parent a4a2d95
commit 4112a08
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/modules.R b/R/modules.R
@@ -195,7 +195,7 @@ editMod <- function(
 
     # leaflet.pm returns only a single feature while leaflet.extras returns feature collection
     # convert leaflet.pm so logic will be the same
-    if(editor == "leafpm") {
+    if(editor[1] == "leafpm") {
       deleted <- list(
         type = "FeatureCollection",
         features = list(deleted)