'disable-interactive' => \$opt_disable_interactive,
'distribution-label=s' => \$opt_distribution_label,
'binary-dir=s' => \$opt_binary_dir,
'disable-interactive' => \$opt_disable_interactive,
'distribution-label=s' => \$opt_distribution_label,
'binary-dir=s' => \$opt_binary_dir,
system 'tput', 'clear' if $interactive;
# Check that the user actually wants this version.
system 'tput', 'clear' if $interactive;
# Check that the user actually wants this version.
print_warning <<'EOW';
You are building a development version. This contains code which has
not been tested as heavily and may contain various faults which could seriously
print_warning <<'EOW';
You are building a development version. This contains code which has
not been tested as heavily and may contain various faults which could seriously
You can obtain the latest stable version from http://www.inspircd.org/ or by
running `git checkout insp20` if you are installing from Git.
You can obtain the latest stable version from http://www.inspircd.org/ or by
running `git checkout insp20` if you are installing from Git.
-exit 1 unless prompt_bool $interactive, 'I understand this warning and want to continue anyway.', !$interactive;
+ if (!prompt_bool $interactive, 'I understand this warning and want to continue anyway.', $opt_development || 0) {
+ print STDERR "If you understand this warning and still want to continue pass the --development flag.\n" unless $interactive;
+ exit 1;
+ }