Revision: 14443
http://sourceforge.net/p/skim-app/code/14443
Author: hofman
Date: 2024-09-01 09:07:01 +0000 (Sun, 01 Sep 2024)
Log Message:
-----------
return qd point descriptor for real point when both coordinates are integral
Modified Paths:
--------------
trunk/NSData_SKExtensions.m
Modified: trunk/NSData_SKExtensions.m
===================================================================
--- trunk/NSData_SKExtensions.m 2024-08-31 16:56:26 UTC (rev 14442)
+++ trunk/NSData_SKExtensions.m 2024-09-01 09:07:01 UTC (rev 14443)
@@ -257,9 +257,15 @@
- (NSAppleEventDescriptor *)scriptingRealPointDescriptor {
NSPoint point = [self pointValueAsNSPoint];
- NSAppleEventDescriptor *descriptor = [NSAppleEventDescriptor
listDescriptor];
- [descriptor insertDescriptor:[NSAppleEventDescriptor
descriptorWithDouble:point.x] atIndex:1];
- [descriptor insertDescriptor:[NSAppleEventDescriptor
descriptorWithDouble:point.y] atIndex:2];
+ NSAppleEventDescriptor *descriptor;
+ if (floor(point.x) >= point.x && floor(point.y) >= point.y) {
+ Point qdPoint = SKQDPointFromNSPoint(point);
+ descriptor = [NSAppleEventDescriptor
descriptorWithDescriptorType:typeQDPoint bytes:&qdPoint length:sizeof(Point)];
+ } else {
+ descriptor = [NSAppleEventDescriptor listDescriptor];
+ [descriptor insertDescriptor:[NSAppleEventDescriptor
descriptorWithDouble:point.x] atIndex:1];
+ [descriptor insertDescriptor:[NSAppleEventDescriptor
descriptorWithDouble:point.y] atIndex:2];
+ }
return descriptor;
}
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
Skim-app-commit mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/skim-app-commit
