 
 (defn spit
   "Spits the chart to the given filename. If no type is provided, the type is
-  guessed by the"
+  guessed by the filename extension. If no extension is found, an error is
+  raised."
   ([chart fname]
    (spit chart fname (guess-extension fname)))
   ([chart fname type]

   (let [chart (CategoryChart. width height)]
     (doseq [[s-name data] series]
       (let [render-style (-> data :style :render-style)]
         (doto-cond (add-series chart s-name data)
          render-style (.setChartCategorySeriesRenderStyle
                        (category-render-styles render-style)))))
     (doto-cond

       (not (nil? show-in-legend?)) (.setShowInLegend (boolean show-in-legend?))))))

(defn bubble-chart*
  "Returns a raw bubble chart. Bubble charts are hard to make right,
  so please see the tutorial for more information about how to create
  one. The render-styles page will give you information about styling
  options."
  ([series]
   (bubble-chart* series {}))
  ([series
