Add a leaflet to avoid ugly failure with view mode.

r-tmap · Mar 15, 2024 · d4e583c · d4e583c
1 parent b0d68a2
commit d4e583c
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -92,6 +92,7 @@ S3method(tmapLeafletCompWidth,tm_legend_standard_portrait)
 S3method(tmapLeafletCompWidth,tm_mouse_coordinates)
 S3method(tmapLeafletCompWidth,tm_scalebar)
 S3method(tmapLeafletCompWidth,tm_title)
+S3method(tmapLeafletLegPlot,tm_chart)
 S3method(tmapLeafletLegPlot,tm_chart_histogram)
 S3method(tmapLeafletLegPlot,tm_compass)
 S3method(tmapLeafletLegPlot,tm_credits)

diff --git a/R/tmapLeafletComp_charts.R b/R/tmapLeafletComp_charts.R
@@ -29,3 +29,8 @@ tmapLeafletCompHeight.tm_chart = function(comp, o) {
 tmapLeafletLegPlot.tm_chart_histogram = function(comp, lf, o) {
  lf
 }
+#' @method tmapLeafletLegPlot tm_chart
+#' @export
+tmapLeafletLegPlot.tm_chart = function(comp, lf, o) {
+ lf
+}