Skip to content
Snippets Groups Projects
Commit a5dd5fd2 authored by Michal Sojka's avatar Michal Sojka
Browse files

continuous: Fix configuration step for newer kernels

It is not sufficient to always answer no. The "choice" question needs
Enter or a number. We answer with Enter.
parent 76b01845
No related branches found
No related tags found
No related merge requests found
......@@ -62,4 +62,4 @@ conf NETFILTER y
conf PACKET y # ugw mmap
timeout 2m yes n|chronic make oldconfig
chronic ../my-oldconfig.pl
#!/usr/bin/perl -w
use Expect;
my $exp = Expect->spawn("make oldconfig")
or die "Cannot spawn make oldconfig: $!\n";
my $timeout = 1;
$exp->expect($timeout,
[ '^ *choice\[.*\]: ' => sub { $exp->send("\n"); exp_continue; } ],
[ '^([^ ]| *[^>0-9]).*\(NEW\) ' => sub { $exp->send("n\n"); exp_continue; } ],
[ "configuration written to .config" ],
) || die "Timeout"
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment