Revision: 27752
http://sourceforge.net/p/bibdesk/svn/27752
Author: hofman
Date: 2022-07-21 18:16:25 +0000 (Thu, 21 Jul 2022)
Log Message:
-----------
Make edge views accessible as a group, as longas they have a background
Modified Paths:
--------------
trunk/bibdesk/BDSKEdgeView.m
Modified: trunk/bibdesk/BDSKEdgeView.m
===================================================================
--- trunk/bibdesk/BDSKEdgeView.m 2022-07-21 17:38:21 UTC (rev 27751)
+++ trunk/bibdesk/BDSKEdgeView.m 2022-07-21 18:16:25 UTC (rev 27752)
@@ -291,6 +291,38 @@
}
}
+- (BOOL)isAccessibilityElement {
+ return backgroundView != nil || backgroundColors != nil;
+}
+
+- (NSString *)accessibilityRole {
+ return NSAccessibilityGroupRole;
+}
+
+- (NSString *)accessibilityRoleDescription {
+ return NSAccessibilityRoleDescription(NSAccessibilityGroupRole, nil);
+}
+
+- (NSArray *)accessibilityChildren {
+ return NSAccessibilityUnignoredChildren([contentView subviews]);
+}
+
+- (BOOL)accessibilityIsIgnored {
+ return backgroundView == nil && backgroundColors == nil;
+}
+
+- (NSArray *)accessibilityAttributeNames {
+ return [super accessibilityAttributeNames];
+}
+
+- (id)accessibilityAttributeValue:(NSString *)attribute {
+ if ([attribute isEqualToString:NSAccessibilityRoleAttribute])
+ return NSAccessibilityGroupRole;
+ else if ([attribute
isEqualToString:NSAccessibilityRoleDescriptionAttribute])
+ return NSAccessibilityRoleDescription(NSAccessibilityGroupRole, nil);
+ return [super accessibilityAttributeValue:attribute];
+}
+
@end
#pragma mark -
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
Bibdesk-commit mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/bibdesk-commit
