From 51d6c536d21ab54f3ebfb009fc137a0d1428bbd7 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Sat, 7 May 2022 15:32:37 -0700 Subject: [PATCH] reversal on name add and subtract are better antonyms --- quad2/constants.rkt | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/quad2/constants.rkt b/quad2/constants.rkt index af391674..c7413171 100644 --- a/quad2/constants.rkt +++ b/quad2/constants.rkt @@ -6,7 +6,7 @@ (define default-font-family "text") (define default-font-size 12) -(define default-features (seteq)) +(define default-no-features (seteq)) (define-syntax-rule (define-attr-list LIST-NAME [ATTR-NAME ATTR-EXPR] ...) @@ -27,6 +27,6 @@ [:font-bold (make-attr-boolean-key 'font-bold #true #false)] [:font-italic (make-attr-boolean-key 'font-italic #true #false)] [:font-size (make-attr-dimension-string-key 'font-size #true default-font-size)] - [:font-features (make-attr-set-key 'font-features default-features)] - [:font-features-add (make-attr-set-key 'font-features-add default-features)] - [:font-features-remove (make-attr-set-key 'font-features-remove default-features)]) \ No newline at end of file + [:font-features (make-attr-set-key 'font-features default-no-features)] + [:font-features-add (make-attr-set-key 'font-features-add default-no-features)] + [:font-features-subtract (make-attr-set-key 'font-features-subtract default-no-features)]) \ No newline at end of file