From 0eab65ee31653f2df896a137379b789adc9761e8 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Sun, 25 Mar 2018 13:53:43 -0700 Subject: [PATCH] OTF test file --- pitfall/pitfall/test/test20.coffee | 2 +- pitfall/pitfall/test/test20.rkt | 12 ++++++------ 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/pitfall/pitfall/test/test20.coffee b/pitfall/pitfall/test/test20.coffee index a524f7ec..371b7c35 100644 --- a/pitfall/pitfall/test/test20.coffee +++ b/pitfall/pitfall/test/test20.coffee @@ -6,7 +6,7 @@ fs = require 'fs' make = (doc) -> # Register a font name for use later - doc.registerFont('the-font', 'assets/fira.otf') + doc.registerFont('the-font', 'assets/charter.otf') # Set the font, draw some text doc.font('the-font') diff --git a/pitfall/pitfall/test/test20.rkt b/pitfall/pitfall/test/test20.rkt index 75963cf2..d3c1aa74 100644 --- a/pitfall/pitfall/test/test20.rkt +++ b/pitfall/pitfall/test/test20.rkt @@ -1,13 +1,13 @@ #lang pitfall/pdftest -;; subset font with GPOS table -(define-runtime-path ttf-path "assets/fira.otf") +;; subset OTF font +(define-runtime-path otf-path "assets/charter.otf") ;; embed otf (define (proc doc) ;; Register a font name for use later - (send doc registerFont "the-font" (path->string ttf-path)) + (send doc registerFont "the-font" (path->string otf-path)) ;; Set the font, draw some text (send* doc @@ -17,7 +17,7 @@ ;; test against non-subsetted font version (define-runtime-path this "test20rkt.pdf") -(make-doc this #f proc ) +(make-doc this #f proc #:test #f) -(define-runtime-path that "test20crkt.pdf") -(make-doc that #t proc #:pdfkit #f) +#;(define-runtime-path that "test20crkt.pdf") +#;(make-doc that #t proc #:pdfkit #f)