Skip to content
Snippets Groups Projects
Commit 782c5885 authored by Dan Sheppard's avatar Dan Sheppard
Browse files

Merge changes in from branches.

parent bc5139b3
No related branches found
No related tags found
No related merge requests found
......@@ -291,7 +291,7 @@ sub get_loutre_params {
loutrehost=s
loutreport=s
loutreuser=s
loutrepass=s
loutrepass:s
loutredbname=s
);
}
......@@ -343,7 +343,7 @@ sub confirm_params {
print "Running script with these parameters:\n\n";
print $self->list_all_params;
if ($self->param('host') eq 'ensdb-web-10') {
if ($self->param('host') eq 'ensweb-1-10') {
# ask user if he wants to proceed
exit unless $self->user_proceed("**************\n\n You're working on ensdb-1-10! Is that correct and you want to continue ?\n\n**************");
}
......@@ -454,7 +454,7 @@ sub check_required_params {
my ($self, @params) = @_;
my @missing = ();
foreach my $param (@params) {
push @missing, $param unless $self->param($param);
push @missing, $param unless defined $self->param($param);
}
if (@missing) {
throw("Missing parameters: @missing.\nYou must specify them on the commandline or in your conffile.\n");
......
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