diff --git a/basis/core-text/fonts/fonts.factor b/basis/core-text/fonts/fonts.factor
index 43a527de0b..0ebc40f523 100644
--- a/basis/core-text/fonts/fonts.factor
+++ b/basis/core-text/fonts/fonts.factor
@@ -78,7 +78,7 @@ FUNCTION: CGFloat CTFontGetXHeight ( CTFontRef font ) ;
 CONSTANT: font-names
     H{
         { "monospace" "Monaco" }
-        { "sans-serif" "Lucida Grande" }
+        { "sans-serif" "LucidaGrande" }
         { "serif" "Times" }
     }