Hey hackers,

I'm a bit sleepy but there are new goodies here:
http://wingolog.org/software/guile-rsvg/.

For example this fragment renders an SVG as a PDF:

    (use-modules (cairo) (rsvg) (srfi srfi-11))

    (define (svg->pdf in out)
      (let*-values (((handle) (rsvg-handle-new-from-file in))
                    ((width height em ex) (rsvg-handle-get-dimensions handle))
                    ((surf) (cairo-pdf-surface-create width height out))
                    ((ctx) (cairo-create surf)))
                   (rsvg-handle-render-cairo handle ctx)
                   (cairo-show-page ctx)
                   (cairo-surface-finish surf)))

Peace,

Andy
-- 
http://wingolog.org/


_______________________________________________
Guile-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/guile-user

Reply via email to