--- doc/loncapafiles/updatequery.piml	2007/04/22 16:33:28	1.56
+++ doc/loncapafiles/updatequery.piml	2007/05/22 23:16:47	1.58
@@ -1,6 +1,6 @@
 <!-- updatequery.piml -->
 
-<!-- $Id: updatequery.piml,v 1.56 2007/04/22 16:33:28 raeburn Exp $ -->
+<!-- $Id: updatequery.piml,v 1.58 2007/05/22 23:16:47 albertel Exp $ -->
 
 <!--
 
@@ -655,6 +655,8 @@ my %perlvarstatic;
 		push(@libservers,$1);
 	    }
 	}
+	# make list unique
+	@libservers = keys(%{{ map { $_ => 1 } (@libservers) }});
 	close(IN);
 	if (@libservers == 1) {
 	    $primaryLibServer = $libservers[0];
@@ -910,6 +912,9 @@ unless (-l "<TARGET />") {
   $line2insert=&lt;&lt;END;
 $perlvar{'lonHostID'}:$perlvar{'lonDefDomain'}:$perlvar{'lonRole'}:$hostname
 END
+  if (!$domainTabExtras) {
+	$domainTabExtras=':::::';
+  }
   $domaininsert="$perlvar{'lonDefDomain'}:$domainDescription:$domainTabExtras:$primaryLibServer\n";
   if ($lonCluster eq 'standalone') {
     open(OUT,'&gt;../'.$lonCluster.'_hosts.tab') or