--- a/Tools__CodeCompletionMenu.st	Tue Feb 18 17:46:42 2014 +0100
+++ b/Tools__CodeCompletionMenu.st	Tue Feb 18 18:00:43 2014 +0100
@@ -274,7 +274,7 @@
     p := codeView originRelativeTo: nil.
     p x: (p x + (codeView xOfPosition:position) - textStartLeft - 3).
     p y: (p y + ("(codeView yOfPosition:position) max:"
-                    (codeView yOfCursor)) + font maxHeight).
+                    (codeView yOfCursor)) + gc font maxHeight).
     "/x := codeView absoluteXOfCursor - (typedString widthOn:codeView) - 10 - 12"/width of icon
     " 10 - Magic number, but looks good on my computer"
     "/x := (codeView absoluteXOfPosition: position) - textStartLeft - 3.
@@ -303,10 +303,10 @@
 !CodeCompletionMenu class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeCompletionMenu.st,v 1.5 2013-09-05 23:19:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeCompletionMenu.st,v 1.6 2014-02-18 17:00:43 stefan Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__CodeCompletionMenu.st,v 1.5 2013-09-05 23:19:02 cg Exp $'
+    ^ '$Id: Tools__CodeCompletionMenu.st,v 1.6 2014-02-18 17:00:43 stefan Exp $'
 ! !