]> rtime.felk.cvut.cz Git - novaboot.git/commitdiff
Simplify --uboot-init handling
authorMichal Sojka <sojkam1@fel.cvut.cz>
Tue, 22 Jul 2014 07:08:51 +0000 (09:08 +0200)
committerMichal Sojka <sojkam1@fel.cvut.cz>
Tue, 22 Jul 2014 07:08:51 +0000 (09:08 +0200)
novaboot

index 357ff032c1d011348adb48ade4acf705583133ae..c5c85b7a4899f9faa050cef4130b87351048c790 100755 (executable)
--- a/novaboot
+++ b/novaboot
@@ -985,8 +985,7 @@ if (defined $uboot) {
     $exp->expect(20,
                 [qr/Hit any key to stop autoboot:/, sub { $exp->send("\n"); exp_continue; }],
                 $uboot_prompt) || die "No uBoot prompt deteceted";
-    while (@uboot_init) {
-       my $cmd = shift @uboot_init;
+    foreach my $cmd (@uboot_init) {
        $exp->send("$cmd\n");
        $exp->expect(10, $uboot_prompt) || die "uBoot prompt timeout";
     }