$NetBSD: patch-aa,v 1.6 2012/02/11 03:21:35 hiramatsu Exp $ Skip interactive configuration. --- Makefile.PL.orig 2012-02-10 16:04:21.000000000 +0000 +++ Makefile.PL @@ -156,93 +156,8 @@ FIX exit 1; } -print <<'OPTIONAL'; - -* Now, let me ask you whether you want some optional modules to be -* installed as well. You can always install these modules later, by -* hand, without a need to re-install MailBox. -* -OPTIONAL - -foreach my $optional (sort {$a->[0] cmp $b->[0]} @optional) -{ my ($module, $version, %args) = @$optional; - my $requirements = $args{requires} || sub {1}; - next unless $requirements->(); - - if($module eq 'MIME::Entity') - { # work-around for awkward development situation at home, - # where the VERSION string is not in the development pre-release. - no warnings; - eval "require Mail::Internet"; - unless($@) - { $Mail::Internet::VERSION ||= '2.00'; - $Mail::Field::VERSION ||= '2.00'; - $Mail::Header::VERSION ||= '2.00'; - } - } - -# print "\n"; - eval "require $module"; - if($@) - { if($@ =~ m/^Can't locate /) - { print "**** Optional $module is not installed\n" } - else { print "**** Optional $module compilation failed:\n$@\n" } - } - elsif(eval '$module->VERSION($version)' && $@) - { my $error = $@ || ''; - $error =~ s/[\r\n]+$//; - print "**** Optional $module too old: requires $version but is ", - $module->VERSION,";$error\n"; - } - else - { my $v = $module->VERSION; - my $r = $v eq $version ? '' - : $version eq 0 ? " (any version will do)" - : " (at least $version required)"; - - print "**** Found optional $module version $v$r\n"; - next; - } - - my $reason = $args{reason}; - $reason =~ s/^/ /gm; - $reason =~ s/\A /Use:/; - print $reason; - - if(my $warn = $args{warning}) - { $warn =~ s/^/ /gm; - $warn =~ s/\A /WARN/; - print $warn; - } - - my $install = $default_install_answer - || prompt "Do you want to install $module? yes/no/all/none" - , (-t STDIN ? 'y' : 'n'); - - $install = $default_install_answer = 'y' - if $install =~ m/^a/i; - - $install = $default_install_answer = 'n' - if $install =~ m/^non/i; - - next if $install !~ m/^y/i; - - my $distr = $args{distr} || $module; - - $prereq{$distr} = $version; - print " Added $distr version $version to the requirements\n"; -} - -my $tests = $ENV{MAILBOX_RUN_TESTS} - || prompt "Do you want to run the (large set of) tests? yes/no", "yes"; - -if($tests =~ m/n/i) -{ open F, ">", "skiptests"; - close F; -} -else -{ unlink "skiptests"; -} +open F, ">", "skiptests"; +close F; print <<'MAKEFILE';