--- a/XWorkstation.st	Fri Mar 03 09:20:47 2017 +0100
+++ b/XWorkstation.st	Sun Mar 05 11:42:57 2017 +0100
@@ -1963,8 +1963,8 @@
 
     h := (self monitorBoundsAt:aPoint) height.
     OperatingSystem isOSXlike ifTrue:[
-	"/ take away some space for the icon-panel at the bottom.
-	^ h - 50
+        "/ take away some space for the dock at the bottom.
+        ^ h - 50
     ].
     ^ h
 
@@ -1975,6 +1975,8 @@
      Screen current usableHeightAt:(9000@0)
      Screen current usableHeightAt:(Display pointFromUser)
     "
+
+    "Modified (format): / 05-03-2017 / 11:25:09 / cg"
 ! !
 
 !XWorkstation methodsFor:'bitmap/window creation'!