diff --git a/pitfall/pitfall/pdf.rkt b/pitfall/pitfall/pdf.rkt
index c15e05e2..607b64a9 100644
--- a/pitfall/pitfall/pdf.rkt
+++ b/pitfall/pitfall/pdf.rkt
@@ -119,7 +119,7 @@
   (define doc-info (make-ref (pdf-info doc)))
   (ref-end doc-info)
     
-  (for-each font-end (hash-values (pdf-font-families doc)))
+  (for-each font-end (sort (hash-values (pdf-font-families doc)) string<? #:key pdf-font-name))
 
   (define pages-ref (dict-ref (pdf-root doc) 'Pages))
   (dict-set! pages-ref 'Count (length (pdf-pages doc)))