From a4136c24751beb3dd90735fbc4d56a39281ca2f1 Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Sat, 17 Nov 2007 23:22:57 +0000
Subject: [PATCH] Handle missing )

---
 bind8/records-lib.pl | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/bind8/records-lib.pl b/bind8/records-lib.pl
index 2628e21f1..217184c2e 100644
--- a/bind8/records-lib.pl
+++ b/bind8/records-lib.pl
@@ -222,8 +222,13 @@ while($i < @tok) {
 		$l = $lnum[$i];
 		while($lnum[$i] == $l && $i < @tok) {
 			if ($tok[$i] eq "(") {
+				my $olnum = $lnum[$i];
 				while($tok[++$i] ne ")") {
 					push(@values, $tok[$i]);
+					if ($i >= @tok) {
+						&error("No ending ) found for ".
+						       "( starting at $olnum");
+						}
 					}
 				$i++; # skip )
 				last;