From 9e5be6dbb88aef1bad2f7331624783cef3010f00 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 9 Aug 1999 14:11:58 +0000
Subject: [PATCH] .

original commit: 0d3a36bcb2f5ed4be98f98b15cf07a07abe9b898
---
 src/mred/wrap/mred.ss | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/mred/wrap/mred.ss b/src/mred/wrap/mred.ss
index 7fe8a51d..c672c9dd 100644
--- a/src/mred/wrap/mred.ss
+++ b/src/mred/wrap/mred.ss
@@ -5143,9 +5143,9 @@
      (case family
        [(system) "systemfont"]
        [(default) "applicationfont"]
-       [(roman) "times"]
-       [(decorative) "geneva"]
-       [(modern) "monaco"]
-       [(swiss) "helvetica"]
-       [(script) "geneva"])]))
+       [(roman) "Times"]
+       [(decorative) "Geneva"]
+       [(modern) "Monaco"]
+       [(swiss) "Helvetica"]
+       [(script) "Geneva"])]))