--- a/Image.st Fri Nov 22 10:43:40 2019 +0100
+++ b/Image.st Fri Nov 22 10:44:15 2019 +0100
@@ -2461,7 +2461,11 @@
|display bounds|
display := Screen current.
- bounds := 0@0 corner:Screen currentDisplayResolution.
+
+ bounds := 0@0
+ corner:(Screen
+ currentResolutionForMonitorNamed:(Screen
+ monitorDeviceNameForPoint:0@0)). "/ use the center monitor
OperatingSystem isOSXlike ifTrue:[
"/ sigh: XQuartz does not include the dock
@@ -2478,7 +2482,7 @@
"
"Modified: / 06-03-2017 / 14:48:42 / cg"
- "Modified: / 15-11-2019 / 10:45:03 / Stefan Reise"
+ "Modified (comment): / 21-11-2019 / 17:49:01 / Stefan Reise"
!
fromScreen:aRectangle
@@ -16680,7 +16684,10 @@
get the pixels
"
[
- self from:rootView in:(Screen transformVirtualDisplayRectangleToRootDisplayRectangle:aRectangle).
+ self
+ from:rootView
+ in:(Screen
+ convertVirtualResolutionRectangleToCurrentResolutionRectangle:aRectangle).
] ensure:[
doGrab ifTrue:[
aDevice ungrabPointer.
@@ -16695,7 +16702,7 @@
Image fromScreen:((100@100) corner:(200@200)) on:Display grab:true
"
- "Modified: / 15-11-2019 / 11:07:05 / Stefan Reise"
+ "Modified (format): / 22-11-2019 / 10:10:57 / Stefan Reise"
!
photometricFromScreen:aDevice