diff --git a/collects/tests/gracket/dc.rktl b/collects/tests/gracket/dc.rktl
index 849f6936..801350d6 100644
--- a/collects/tests/gracket/dc.rktl
+++ b/collects/tests/gracket/dc.rktl
@@ -502,4 +502,9 @@
 
 ;; ----------------------------------------
 
+(test #f 'no-commas (ormap (lambda (s) (regexp-match? #rx"," s)) (get-face-list)))
+(test #t 'all-commas (andmap (lambda (s) (regexp-match? #rx"," s)) (get-face-list #:all-variants? #t)))
+
+;; ----------------------------------------
+
 (report-errs)