 (defn- set-legend!
   [^Styler styler
    {:keys [background-color border-color font padding
-           position series-line-length visible]}]
+           position series-line-length visible?]}]
   (doto-cond
    styler
    background-color (.setLegendBackgroundColor (colors background-color background-color))

    (let [{:keys [x y error-bars style]} data
          {:keys [marker-color marker-type
                  line-color line-style line-width
                  fill-color show-in-legend]} style]
      (doto-cond
       (if error-bars
         (add-raw-series chart s-name x y error-bars)

  ([series]
   (pie-chart series {}))
  ([series
    {:keys [width height title circular? theme render-style annotation-distance
            start-angle draw-all-annotations? donut-thickness annotation-type]
     :or {width 640 height 500}
     :as styling}]
   {:pre [series]}
