Makes the plots in Gadfly non-interactive (Juno lags with interactive plots)

NoninteractiveGadfly.jl

module NoninteractiveGadfly
import Compose
import Compose: writemime
import Gadfly

export @noninteractive

type NoninteractivePlot
  p::Gadfly.Plot
end

function writemime(io::IO, m::MIME"text/html", p::NoninteractivePlot)
    buf = IOBuffer()
    svg = Gadfly.SVG(buf, Compose.default_graphic_width,
                Compose.default_graphic_height, false)
    Gadfly.draw(svg, p.p)
    writemime(io, m, svg)
end

macro noninteractive(plot)
  :( NoninteractivePlot($(esc(plot))) )
end

end