@@ -494,11 +494,11 @@
 		(if font-changed (canvas-font-set! cnv font))
 		(canvas-text! cnv (+ 2 llx)(+ 2 lly) text)
 		(let-values (((xmax ymax)(canvas-text-size cnv text)))
 		  (set! text-xmax xmax)(set! text-ymax ymax))
 		(if font-changed (canvas-font-set! cnv prev-font))))))
-    (print "text-xmax: " text-xmax " text-ymax: " text-ymax)
+    ;; (print "text-xmax: " text-xmax " text-ymax: " text-ymax)
     (if (vg:obj-extents obj)
 	(vg:obj-extents obj)
 	(if (not text)
 	    pts
 	    (if (and text-xmax text-ymax)
@@ -553,11 +553,11 @@
 		(if font-changed (canvas-font-set! cnv font))
 		(canvas-text! cnv (+ 2 llx)(+ 2 lly) text)
 		(let-values (((xmax ymax)(canvas-text-size cnv text)))
 		  (set! text-xmax xmax)(set! text-ymax ymax))
 		(if font-changed (canvas-font-set! cnv prev-font))))))
-    (print "text-xmax: " text-xmax " text-ymax: " text-ymax)
+    ;; (print "text-xmax: " text-xmax " text-ymax: " text-ymax)
     (if (vg:obj-extents obj)
 	(vg:obj-extents obj)
 	(if (not text)
 	    pts
 	    (if (and text-xmax text-ymax)