no scaling in render pt 2

quad2/render.rkt

@@ -84,7 +84,6 @@
 (define (html-renderer html-file)
   (let ([xmax 0]
         [ymax 0]
-        [em-scale 30]
         [page-quads null]
         [current-loc 0+0i]
         [pages null]
@@ -103,7 +102,7 @@
        (set! page-quads null))
      (λ (charint)
        (set! page-quads (cons
-                         `(div ((style ,(format "position: absolute;left:~apx;top:~apx;font-family:~a" (* em-scale (real-part current-loc)) (* em-scale (imag-part current-loc)) current-font)))
+                         `(div ((style ,(format "position: absolute;left:~apx;top:~apx;font-family:~a" (real-part current-loc) (imag-part current-loc) current-font)))
                                ,(string (integer->char charint))) page-quads)))
      (λ (ps)
        (set! current-font (hash-ref! fonts ps (λ () (gensym 'font)))))