diff --git a/R/api-hc-hc_add_series.R b/R/api-hc-hc_add_series.R
index 9fa08bc8..4f0a692b 100644
--- a/R/api-hc-hc_add_series.R
+++ b/R/api-hc-hc_add_series.R
@@ -535,7 +535,7 @@ data_to_options <- function(data, type) {
     (type == "treemap" & "color" %in% names(data)) | (type == "heatmap")
   
   # series marker enabled
-  opts$series_marker_enabled <- !(type %in% c("line", "spline"))
+  # opts$series_marker_enabled <- !(type %in% c("line", "spline"))
   
   # heatmap
   if (type == "heatmap") {
diff --git a/R/hchart.R b/R/hchart.R
index 786a50c3..28c54345 100644
--- a/R/hchart.R
+++ b/R/hchart.R
@@ -52,8 +52,7 @@ hchart.data.frame <- function(object, type = NULL, mapping = hcaes(), ...){
              categories = opts$yAxis_categories) %>% 
     hc_plotOptions(
       series = list(
-        showInLegend = opts$series_plotOptions_showInLegend,
-        marker = list(enabled = opts$series_marker_enabled)
+        showInLegend = opts$series_plotOptions_showInLegend
       ),
       scatter = list(marker = list(symbol = "circle"))
     )