diff --git a/quad2/constants.rkt b/quad2/constants.rkt
index 3ee74733..021c6bf2 100644
--- a/quad2/constants.rkt
+++ b/quad2/constants.rkt
@@ -12,4 +12,5 @@
   [:font-family (attr-uncased-string 'font-family)]
   [:font-path (attr-path 'font-path)]
   [:font-bold (attr-boolean 'font-bold)]
-  [:font-italic (attr-boolean 'font-italic)])
\ No newline at end of file
+  [:font-italic (attr-boolean 'font-italic)]
+  [:font-size (attr-dimension-string 'font-size)])
\ No newline at end of file
diff --git a/quad2/dimension.rkt b/quad2/dimension.rkt
index b6bfab0b..56685fe7 100644
--- a/quad2/dimension.rkt
+++ b/quad2/dimension.rkt
@@ -1,10 +1,8 @@
 #lang debug racket/base
-(require racket/match)
+(require racket/match
+         "constants.rkt")
 (provide (all-defined-out))
 
-;; TODO: define :font-size properly
-(define :font-size 'font-size)
-
 (define (pica->pts prefix [suffix #false])
   ;; both pieces of measurement are either positive or negative
   ((if (negative? prefix) - +) (+ (* (abs prefix) 12) (or suffix 0))))