--- a/GraphicsMedium.st	Mon Sep 12 06:58:02 2016 +0200
+++ b/GraphicsMedium.st	Mon Sep 19 13:38:17 2016 +0100
@@ -531,7 +531,7 @@
      This is a low level entry, which is not to be redefined
      (i.e. it must not imply a redraw operation)"
 
-    gc basicFont:aFont
+    gc font:aFont
 !
 
 blackColor
@@ -822,7 +822,7 @@
      This should be redefined in some widget to perform an automatic
      redraw. See also: #basicFont:"
 
-    gc basicFont:aFont.
+    gc font:aFont.
     self changed:#font.
 !