--- a/Image.st Sun Mar 05 11:42:57 2017 +0100
+++ b/Image.st Sun Mar 05 11:43:46 2017 +0100
@@ -2335,20 +2335,26 @@
it may not work from within a buttonMotion
(use #fromScreen:on:grab: with a false grabArg then)."
- |display|
+ |display bounds|
display := Screen current.
- ^ self
- fromScreen:(0@0 corner:(display width @ display height))
- on:display
- grab:true
+ bounds := (0@0 corner:(display width @ display height)).
+
+ OperatingSystem isOSXlike ifTrue:[
+ "/ sigh: XQuartz does not include the dock
+ display == Display ifTrue:[
+ bounds := OperatingSystem screenBounds:0
+ ].
+ ].
+
+ ^ self fromScreen:bounds on:display grab:true
"
Image fromScreen
Image fromScreen inspect
"
- "Modified: 26.3.1997 / 10:44:55 / cg"
+ "Modified: / 05-03-2017 / 11:35:34 / cg"
!
fromScreen:aRectangle