From d14b814529b5ac937c516c83e9653fd18fabf293 Mon Sep 17 00:00:00 2001 From: Jacob Pipkin Date: Fri, 16 Nov 2012 23:26:19 -0600 Subject: use label when doing loop control --- sboremove | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/sboremove b/sboremove index dd3b28e..be0657c 100755 --- a/sboremove +++ b/sboremove @@ -102,9 +102,9 @@ if ($no_reqs) { } # Determine required by for all installed sbo's -for my $inst (@$inst_names) { +FIRST: for my $inst (@$inst_names) { my $requires = get_requires "$inst"; - next unless $$requires[0]; + next FIRST unless $$requires[0]; for my $req (@$requires) { unless ( $req eq "%README%" ) { if ( $req ~~ $inst_names ) { -- cgit v1.2.3