From 3db248f2d79a635fd4a58dd2a37b23b00cfe1612 Mon Sep 17 00:00:00 2001 From: olivroy Date: Fri, 15 Mar 2024 10:06:04 -0400 Subject: [PATCH] Fix partial match warning --- R/step4_plot.R | 2 +- R/tmapLeafletLegend.R | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/R/step4_plot.R b/R/step4_plot.R index 7ce535a6..6ce0d8c2 100644 --- a/R/step4_plot.R +++ b/R/step4_plot.R @@ -524,7 +524,7 @@ step4_plot = function(tm, vp, return.asp, show, knit, args) { # prepare aux layers and return group label (in case it is not user specified) aux_group_def = mapply(function(a, id) { FUNaux_prep = paste0("tmap", gs, a$mapping.fun, "Prep") - do.call(FUNaux_prep, list(a = a$args, b = db$bbox, id = id, o = o)) + do.call(FUNaux_prep, list(a = a$args, bs = db$bbox, id = id, o = o)) }, aux, 1:length(aux)) aux_group = mapply(function(a, agd) { if (is.na(a$group)) agd else as.character(a$group) diff --git a/R/tmapLeafletLegend.R b/R/tmapLeafletLegend.R index b3569f5b..defd1583 100644 --- a/R/tmapLeafletLegend.R +++ b/R/tmapLeafletLegend.R @@ -104,7 +104,7 @@ tmapLeaflet_legend = function(cmp, lf, o, orientation) { legpos = leaflet_pos(cmp$position) - lf2 = if (cmp$typ == "none") { + lf2 = if (cmp$type == "none") { #message("Text based legends not supported in view mode") lf } else if (cmp$type == "gradient") {