allow to add classifying folder from classifying folders (#4093)

This commit is contained in:
Frédéric Péters 2013-12-27 12:38:19 +01:00
parent 1403af59ce
commit 4602282e10
2 changed files with 8 additions and 0 deletions

View File

@ -161,6 +161,7 @@ class FolderView(DefaultView, ClassifiedItems):
pass
@grok.subscribe(IFolder, IObjectAddedEvent)
@grok.subscribe(IDmsDocument, IObjectAddedEvent)
def move_to_proper_location(context, event):
folder = context.getParentNode()
@ -177,3 +178,9 @@ def move_to_proper_location(context, event):
clipboard = folder.manage_cutObjects([context.id])
documents_folder = api.portal.get().documents
result = documents_folder.manage_pasteObjects(clipboard)
# makes sure original object is deleted
try:
folder.manage_delObjects([context.id])
except AttributeError:
pass

View File

@ -25,6 +25,7 @@
<!-- Contained Types -->
<property name="filter_content_types">True</property>
<property name="allowed_content_types" purge="False">
<element value="pfwbgedfolder"/>
<element value="pfwbgedlink"/>
<element value="dmsincomingmail"/>
<element value="dmsoutgoingmail"/>