From cc52b446e5d82836ddbff73efd3063cac7b829c0 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Fri, 17 May 2019 09:33:16 -0700 Subject: [PATCH] Fix enumerate-graphics-types per documentation. --- src/runtime/graphics.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/runtime/graphics.scm b/src/runtime/graphics.scm index ed37bde78..c9c4c3a4a 100644 --- a/src/runtime/graphics.scm +++ b/src/runtime/graphics.scm @@ -217,7 +217,8 @@ USA. (graphics-type type #f)) (define (enumerate-graphics-types) - (filter graphics-device-type/available? graphics-types)) + (map graphics-device-type/name + (filter graphics-device-type/available? graphics-types))) (define (graphics-device-type/available? type) ((graphics-device-type/operation/available? type))) -- 2.25.1