diff --git a/pitfall/pitfall/document.rkt b/pitfall/pitfall/document.rkt index 535fda7f..fd85720b 100644 --- a/pitfall/pitfall/document.rkt +++ b/pitfall/pitfall/document.rkt @@ -88,7 +88,7 @@ (send doc-info end) (for ([font (in-hash-values @font-families)]) - (send font finalize)) + (send font end)) (send* (dict-ref @root 'Pages) [set-key! 'Count (length @pages)] diff --git a/pitfall/pitfall/font.rkt b/pitfall/pitfall/font.rkt index ef009685..495752ca 100644 --- a/pitfall/pitfall/font.rkt +++ b/pitfall/pitfall/font.rkt @@ -19,7 +19,7 @@ (set! @dictionary (make-ref))) @dictionary) - (define/public (finalize) + (define/public (end) (unless (or @embedded (not @dictionary)) (embed) (set! @embedded #t)))