Better @INC fiddling and degenerate case for ProgressTree
This commit is contained in:
parent
f14545ec12
commit
bb8753cd2a
7 changed files with 49 additions and 23 deletions
|
|
@ -73,6 +73,7 @@ sub copyInFork {
|
|||
}
|
||||
my $ids = $asset->getLineage(\@pedigree);
|
||||
my $tree = WebGUI::ProgressTree->new($session, $ids);
|
||||
$process->update(sub { $tree->json });
|
||||
my $patch = Monkey::Patch::patch_class(
|
||||
'WebGUI::Asset', 'duplicate', sub {
|
||||
my $duplicate = shift;
|
||||
|
|
@ -331,6 +332,7 @@ sub pasteInFork {
|
|||
} @roots;
|
||||
|
||||
my $tree = WebGUI::ProgressTree->new( $session, \@ids );
|
||||
$process->update(sub { $tree->json });
|
||||
my $patch = Monkey::Patch::patch_class(
|
||||
'WebGUI::Asset',
|
||||
'indexContent',
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue