Select Code to Download

  # build the dependency map for active children
  $child{$_} ||= $parent{$_} for grep $_->active, $self->children;

  warn "Deleting removed script '$_'\n" for map $_->name, @deleted;

  for my $hidden (grep !$_->visible, @objects) {
    ...
  }

  # build the dependency map for active children
  $_->active and $child{$_} ||= $parent{$_} for $self->children;
...
    next if $hidden->visible;
    ...
  }