From ed1be9adade168b666f21bce0669cfe399cbe8db Mon Sep 17 00:00:00 2001 From: Jacob Pipkin Date: Fri, 29 Jun 2012 08:49:21 -0500 Subject: fixed bug in sbofind, using eq where = belonged --- sbofind | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sbofind b/sbofind index 6f23587..5e8931d 100755 --- a/sbofind +++ b/sbofind @@ -57,7 +57,7 @@ my $loc_regex = qr/LOCATION:\s+(.*)$/; my $fh = open_read ("$config{SBO_HOME}/SLACKBUILDS.TXT"); FIRST: while (my $line = <$fh>) { if ($found eq 'FALSE') { - $found eq 'TRUE', next FIRST if $name = ($line =~ $name_regex)[0]; + $found = 'TRUE', next FIRST if $name = ($line =~ $name_regex)[0]; } else { if (my ($location) = ($line =~ $loc_regex)[0]) { $found = 'FALSE'; -- cgit v1.2.3