Commit a28ef353 authored by Leo Gordon's avatar Leo Gordon
Browse files

do not require connection parameters when drawing a diagram from a -pipeconfig

parent a1fa4ae0
...@@ -402,13 +402,18 @@ sub pipeline_name { ...@@ -402,13 +402,18 @@ sub pipeline_name {
=cut =cut
sub process_options { sub process_options {
my $self = shift @_; my ($self, $include_pcc_use_case) = @_;
# pre-patch definitely_used_options: # pre-patch definitely_used_options:
$self->{'_extra_options'} = $self->load_cmdline_options( $self->pre_options() ); $self->{'_extra_options'} = $self->load_cmdline_options( $self->pre_options() );
$self->root()->{'pipeline_url'} = $self->{'_extra_options'}{'pipeline_url'}; $self->root()->{'pipeline_url'} = $self->{'_extra_options'}{'pipeline_url'};
$self->use_cases( [ 'pipeline_create_commands', 'pipeline_wide_parameters', 'resource_classes', 'pipeline_analyses', 'beekeeper_extra_cmdline_options', 'pipeline_url', 'hive_meta_table' ] ); my @use_cases = ( 'pipeline_wide_parameters', 'resource_classes', 'pipeline_analyses', 'beekeeper_extra_cmdline_options', 'hive_meta_table' );
if($include_pcc_use_case) {
unshift @use_cases, 'pipeline_create_commands';
}
$self->use_cases( \@use_cases );
return $self->SUPER::process_options(); return $self->SUPER::process_options();
} }
......
...@@ -79,7 +79,7 @@ sub main { ...@@ -79,7 +79,7 @@ sub main {
my $pipeconfig_package_name = load_file_or_module( $self->{'pipeconfig'} ); my $pipeconfig_package_name = load_file_or_module( $self->{'pipeconfig'} );
my $pipeconfig_object = $pipeconfig_package_name->new(); my $pipeconfig_object = $pipeconfig_package_name->new();
$pipeconfig_object->process_options(); $pipeconfig_object->process_options( 0 );
$pipeconfig_object->add_objects_from_config(); $pipeconfig_object->add_objects_from_config();
} }
......
...@@ -40,7 +40,7 @@ sub main { ...@@ -40,7 +40,7 @@ sub main {
my $pipeconfig_package_name = load_file_or_module( $file_or_module ); my $pipeconfig_package_name = load_file_or_module( $file_or_module );
my $pipeconfig_object = $pipeconfig_package_name->new(); my $pipeconfig_object = $pipeconfig_package_name->new();
$pipeconfig_object->process_options(); $pipeconfig_object->process_options( 1 );
$pipeconfig_object->run_pipeline_create_commands(); $pipeconfig_object->run_pipeline_create_commands();
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment