--- a/DeviceWorkstation.st Mon Feb 04 19:14:28 2013 +0100
+++ b/DeviceWorkstation.st Thu Feb 07 22:32:14 2013 +0100
@@ -1965,7 +1965,7 @@
!DeviceWorkstation methodsFor:'accessing-display capabilities'!
centerOfMonitorHavingPointer
- ^ (self monitorBoundsAt:self pointerPosition) center.
+ ^ (self monitorBoundsAt:self pointerPosition) center rounded.
"
Screen current centerOfMonitorHavingPointer
@@ -8237,11 +8237,11 @@
!DeviceWorkstation class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.578 2013-01-30 17:44:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.579 2013-02-07 21:32:14 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.578 2013-01-30 17:44:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.579 2013-02-07 21:32:14 cg Exp $'
! !