--- a/SimpleView.st	Wed Nov 20 16:02:14 2019 +0100
+++ b/SimpleView.st	Thu Nov 21 17:57:23 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -9702,18 +9700,6 @@
     "Created: 5.6.1996 / 01:05:06 / cg"
 !
 
-monitorDeviceName
-    "attention can be nil if failed or if not windows"
-
-    "
-        Transcript topView monitorDeviceName
-    "
-
-    ^ Screen current monitorDeviceNameForView:self id
-
-    "Created: / 20-11-2019 / 15:58:30 / Stefan Reise"
-!
-
 originChangedFlag
     "/ ^ originChangedFlag == true
     ^ flagBits bitTest:FlagOriginChanged