From 96641d4985a7743aa53321ecb7aee6e606c1f917 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Sat, 3 Mar 2018 17:22:14 -0800 Subject: [PATCH] better --- quad/quad/wrap.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/quad/quad/wrap.rkt b/quad/quad/wrap.rkt index f8a5cccd..242abeca 100644 --- a/quad/quad/wrap.rkt +++ b/quad/quad/wrap.rkt @@ -133,7 +133,8 @@ (test-case "hyphens, hard and soft" - (check-equal? (linewrap (list x x hyph x x) 1 42) (list x 'lb x 'lb hyph 'lb x 'lb x)) + (check-equal? (linewrap (list x hyph x) 1 'debug) (list x 'lb hyph 'lb x)) + #;(check-equal? (linewrap (list x x hyph x x) 1 'debug) (list x 'lb x 'lb hyph 'lb x 'lb x)) #;(check-equal? (linewrap (list x x hyph x x) 2) (list x x 'lb hyph x 'lb x x)) (check-equal? (linewrap (list x x hyph x x) 3) (list x x hyph 'lb x x)) (check-equal? (linewrap (list x x hyph x x) 4) (list x x hyph 'lb x x))