--- a/DebugView.st	Thu Feb 13 17:25:19 2014 +0100
+++ b/DebugView.st	Thu Feb 13 19:32:47 2014 +0100
@@ -2757,7 +2757,7 @@
 
     super initialize.
 
-    font := font onDevice:device.
+    self createFontOnDevice.
     userPrefs := UserPreferences current.
 
     verboseBacktrace := userPrefs verboseBacktraceInDebugger ? false.
@@ -9066,15 +9066,15 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.644 2014-02-06 11:47:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.645 2014-02-13 18:32:47 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.644 2014-02-06 11:47:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.645 2014-02-13 18:32:47 stefan Exp $'
 !
 
 version_SVN
-    ^ '$Id: DebugView.st,v 1.644 2014-02-06 11:47:16 cg Exp $'
+    ^ '$Id: DebugView.st,v 1.645 2014-02-13 18:32:47 stefan Exp $'
 ! !