From 8a52338b9b5b0e07a9b2659fc22c079f84beb895 Mon Sep 17 00:00:00 2001 From: Robin Cura Date: Thu, 13 Mar 2014 19:30:45 +0100 Subject: [PATCH] fix Leaflet's circle --- R/Leaflet.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/Leaflet.R b/R/Leaflet.R index 2884341..89a8dec 100644 --- a/R/Leaflet.R +++ b/R/Leaflet.R @@ -85,8 +85,8 @@ Leaflet = setRefClass('Leaflet', contains = 'rCharts', methods = list( geoJson = toJSON2(params$geoJson) kml = toJSON2(params$kml) marker = paste(lapply(params$marker, toChain, obj = 'L'), collapse = '\n') - # circle = paste(lapply(params$circle, toChain, obj = 'L'), collapse = '\n') - circle = toChain(params$circle, obj = 'L') + circle = paste(lapply(params$circle, toChain, obj = 'L'), collapse = '\n') + #circle = toChain(params$circle, obj = 'L') chartParams = toJSON(params[!(names(params) %in% skip)], digits = 13) list( chartParams = chartParams,