Author: ericwa
Date: Thu Mar 13 08:39:39 2014
New Revision: 10555
URL: http://svn.gna.org/viewcvs/etoile?rev=10555&view=rev
Log:
Typewriter: Only allow dropping tags onto tag groups that don't already contain
the tag
Modified:
trunk/Etoile/Frameworks/CoreObject/Samples/Typewriter/EWTagListDataSource.m
Modified:
trunk/Etoile/Frameworks/CoreObject/Samples/Typewriter/EWTagListDataSource.m
URL:
http://svn.gna.org/viewcvs/etoile/trunk/Etoile/Frameworks/CoreObject/Samples/Typewriter/EWTagListDataSource.m?rev=10555&r1=10554&r2=10555&view=diff
==============================================================================
--- trunk/Etoile/Frameworks/CoreObject/Samples/Typewriter/EWTagListDataSource.m
(original)
+++ trunk/Etoile/Frameworks/CoreObject/Samples/Typewriter/EWTagListDataSource.m
Thu Mar 13 08:39:39 2014
@@ -211,8 +211,17 @@
{
if ([[[info draggingPasteboard] types] containsObject: EWTagDragType])
{
+ id plist = [[info draggingPasteboard] propertyListForType:
EWTagDragType];
+ COTag *tag = [[[self.owner tagLibrary] objectGraphContext]
loadedObjectForUUID: [ETUUID UUIDWithString: plist]];
+
if ([[item representedObject] isKindOfClass: [COTagGroup
class]])
- return NSDragOperationMove;
+ {
+ COTagGroup *targetTagGroup = [item representedObject];
+ if (![[tag tagGroups] containsObject: targetTagGroup])
+ return NSDragOperationMove;
+ else
+ return NSDragOperationNone;
+ }
}
else if ([[[info draggingPasteboard] types] containsObject:
EWNoteDragType])
{
_______________________________________________
Etoile-cvs mailing list
[email protected]
https://mail.gna.org/listinfo/etoile-cvs
