Specify xmlns.

1 files changed, 2 insertions, 1 deletions

diff --git a/pict.scm b/pict.scm
index 7939abe..86ee005 100644
--- a/pict.scm
+++ b/pict.scm
@@ -112,7 +112,8 @@
  (lambda (record port)
    (let* ((xml  (with-output-to-string
                   (lambda _ (sxml->xml `(svg (@ (width ,(pict-width record))
-                                                (height ,(pict-height record)))
+                                                (height ,(pict-height record))
+                                                (xmlns "http://www.w3.org/2000/svg"))
                                              ,(pict-sxml record))))))
           (name (string-append "/tmp/geiser-"
                                (number->string (string-hash xml))