--- db/prgsrc/updatedb.pl	2000/10/22 06:03:35	1.15
+++ db/prgsrc/updatedb.pl	2000/10/22 23:47:06	1.16
@@ -22,7 +22,7 @@ The database, user and password are hard
 
 Dmitry Rubinstein
 
-=head1 $Id: updatedb.pl,v 1.15 2000/10/22 06:03:35 boris Exp $
+=head1 $Id: updatedb.pl,v 1.16 2000/10/22 23:47:06 boris Exp $
 
 =cut
 
@@ -78,8 +78,9 @@ sub getField {
 	}
 	next if (/^\s*$/);
 	
-	if (/^(.*)[:\.]\s*/ && !$key) {
+	if (!$key && /^(.*?)[:\.]\s*(.*)$/s) {
 	    $key = $1;
+	    $value=$2;
 	    next;
 	}
 	if ($key) {