From 4112a083cb510c342906661974121fa15df40250 Mon Sep 17 00:00:00 2001
From: Jakob Gutschlhofer <jakob.gutschlhofer@gmail.com>
Date: Thu, 4 Jul 2019 13:33:16 +0200
Subject: [PATCH] avoid warnings while checking for which editor to use

---
 R/modules.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/modules.R b/R/modules.R
index d837d07..7fc1f4a 100644
--- 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)