fix show(), print to IO

Author: Vincent Landau

src/show.jl

@@ -1,32 +1,37 @@
 import Base: show
 
 function show(io::IO, g::AbstractRasterGraph)
-    printstyled("$(typeof(g))\n", color=:blue)
-    printstyled("  graph", color=:red)
-    print(": $(typeof(g.graph)) with $(nv(g)) vertices and $(ne(g)) edges\n")
+    printstyled(io, "$(typeof(g))", color=:blue)
+    print(io, ":\n")
+    printstyled(io, "  graph", color=:red)
+    print(io, ": $(typeof(g.graph)) with $(nv(g)) vertices and $(ne(g)) edges\n")
 
-    printstyled("  vertex_raster", color=:red)
+    printstyled(io, "  vertex_raster", color=:red)
     print(
+        io,
         ": $(string(nameof(typeof(g.vertex_raster))))" *
         "{$(eltype(g.vertex_raster)), $(length(dims(g.vertex_raster)))}"
     )
-    printstyled(" with dimensions:\n", color=:light_black)
+    printstyled(io, " with dimensions:\n", color=:light_black)
 
     x_dim = dims(g.vertex_raster, X)
     y_dim = dims(g.vertex_raster, Y)
-    printstyled("    X", color=:cyan)
+    printstyled(io, "    X", color=:cyan)
     print(
+        io,
         ": range($(minimum(x_dim)), $(maximum(x_dim)), step=$(x_dim.val[2] - x_dim.val[1]))\n"
 
     )
-    printstyled("    Y", color=:cyan)
+    printstyled(io, "    Y", color=:cyan)
     print(
+        io,
         ": range($(minimum(y_dim)), $(maximum(y_dim)), step=$(y_dim.val[2] - y_dim.val[1]))"
     )
     if (hasdim(g.vertex_raster, Band))
         band_dim = dims(g.vertex_raster, Band)
-        printstyled("\n    Band", color=:cyan)
+        printstyled(io, "\n    Band", color=:cyan)
         print(
+            io,
             ": $(minimum(band_dim)):$(maximum(band_dim))"
         )
     end