Merge pull request #119 from lobingera/new_canvas

CairoContext from pointer only,
JuliaGraphics · Sep 13, 2015 · 1e6d7c3 · 1e6d7c3
2 parents 3ca577c + 9971cd5
commit 1e6d7c3
Showing 1 changed file with 20 additions and 0 deletions.
diff --git a/src/Cairo.jl b/src/Cairo.jl
@@ -110,6 +110,14 @@ type CairoSurface <: GraphicsDevice
         finalizer(self, destroy)
         self
     end
+    function CairoSurface(ptr::Ptr{Void})
+        self = new(ptr)
+        #finalizer(self, destroy)
+        self
+    end
+
+
+
 end
 
 width(surface::CairoSurface) = surface.width
@@ -339,6 +347,18 @@ type CairoContext <: GraphicsContext
         finalizer(self, destroy)
         self
     end
+    function CairoContext(ptr::Ptr{Void})
+        surface_p = ccall((:cairo_get_target,_jl_libcairo),
+                   Ptr{Void}, (Ptr{Void},), ptr)
+        surface = CairoSurface(surface_p)
+        layout = ccall((:pango_cairo_create_layout,_jl_libpangocairo),
+                  Ptr{Void}, (Ptr{Void},), ptr)
+        self = new(ptr,surface,layout)
+        #finalizer(self, destroy)
+        self
+    end
+
+
 end
 
 creategc(s::CairoSurface) = CairoContext(s)