--- a/Image.st	Mon Sep 16 18:01:43 2019 +0200
+++ b/Image.st	Mon Sep 16 18:02:13 2019 +0200
@@ -3008,7 +3008,8 @@
 
 device
     "return the device, the receiver is associated with.
-     Return nil, if the image is unassigned."
+     Return nil, if the image is unassigned.
+     Please use graphicsDevice for ST80 compatibility."
 
     ^ device
 !