diff options
author | J Pipkin <j@dawnrazor.net> | 2013-01-12 04:58:23 -0600 |
---|---|---|
committer | J Pipkin <j@dawnrazor.net> | 2013-01-12 04:58:23 -0600 |
commit | e95685f4330b20cc660c69b803c3ce90f33bc430 (patch) | |
tree | 2b948c66bea34b9951362ae5f61463d6cc0ad9fa /sboinstall | |
parent | be2bb2b27d61a39bff6efd890c3d519c39db321e (diff) | |
download | sbotools2-e95685f4330b20cc660c69b803c3ce90f33bc430.tar.xz |
resolve items marked TODO
Diffstat (limited to 'sboinstall')
-rwxr-xr-x | sboinstall | 12 |
1 files changed, 10 insertions, 2 deletions
@@ -130,7 +130,11 @@ FIRST: for my $sbo (@$build_queue) { if ($compat32) { unless ($sbo ~~ @$inst_names) { say "$name requires $sbo."; - my ($cmds, $opts) = user_prompt($sbo, $locations{$sbo}); + my ($cmds, $opts, $exit) = user_prompt($sbo, $locations{$sbo}); + if ($exit) { + warn "Unable to open README for $sbo.\n"; + exit $exit; + } if ($cmds) { next FIRST if $cmds eq 'N'; } @@ -140,7 +144,11 @@ FIRST: for my $sbo (@$build_queue) { say "$sbo$added"; } } - my ($cmds, $opts) = user_prompt($name, $locations{$name}); + my ($cmds, $opts, $exit) = user_prompt($name, $locations{$name}); + if ($exit) { + warn "Unable to open README for $name.\n"; + exit $exit; + } if ($cmds) { next FIRST if $cmds eq 'N'; } |