--- a/Font.st	Mon Apr 05 18:46:11 2004 +0200
+++ b/Font.st	Tue Apr 06 22:18:56 2004 +0200
@@ -271,7 +271,10 @@
 !Font methodsFor:'accessing'!
 
 device
-    "return the device I am on"
+    "return the device I am on.
+     Obsolete - use #graphicsDevice"
+
+    <resource:#obsolete>
 
     ^ device
 !
@@ -1120,7 +1123,7 @@
 !Font class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.92 2004-03-19 15:48:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.93 2004-04-06 20:18:50 stefan Exp $'
 ! !
 
 Font initialize!