It is not sufficient to always answer no. The "choice" question needs
Enter or a number. We answer with Enter.
-timeout 2m yes n|chronic make oldconfig
+chronic ../my-oldconfig.pl
--- /dev/null
+#!/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"