# OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
# PERFORMANCE OF THIS SOFTWARE.
-# $Id: update_branches,v 1.4 2005/05/16 06:39:39 marka Exp $
+# $Id: update_branches,v 1.5 2005/05/16 06:57:51 marka Exp $
%branches = ();
%whom = ();
open(BRANCHES, "<doc/private/branches") || die "can't open util/branches: $!";
while (<BRANCHES>) {
chomp;
- next if (/^-*$/
+ next if (/^-/);
next if (/^Branch/);
$c = "";
if (m/\(.*\)/) {