doc/loncapafiles/updatequery.piml - diff

Return to updatequery.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

version 1.45, 2006/01/07 14:29:16	version 1.46, 2006/01/28 10:35:02
Line 612 my %perlvarstatic;	Line 612 my %perlvarstatic;
(undef,$domainDescription,$domainTabExtras)=split(/:/,$_,3);	(undef,$domainDescription,$domainTabExtras)=split(/:/,$_,3);
chomp($domainDescription);	chomp($domainDescription);
chomp($domainTabExtras);	chomp($domainTabExtras);
	# the remianing field (primary lib server) is handled later
	$domainTabExtras = join(':',(split(/:/,$domainTabExtras))[0..5]);
last;	last;
}	}
}	}
Line 624 my %perlvarstatic;	Line 626 my %perlvarstatic;
(undef,$domainDescription,$domainTabExtras)=split(/:/,$_,3);	(undef,$domainDescription,$domainTabExtras)=split(/:/,$_,3);
chomp($domainDescription);	chomp($domainDescription);
chomp($domainTabExtras);	chomp($domainTabExtras);
	# the remianing field (primary lib server) is handled later
	$domainTabExtras = join(':',(split(/:/,$domainTabExtras))[0-5]);
last;	last;
}	}
}	}
Line 677 my %perlvarstatic;	Line 681 my %perlvarstatic;
}	}

# implement editing logic below, interactively	# implement editing logic below, interactively
# update loncapa.conf until 8 is entered	# update loncapa.conf until 12 is entered

$flag=0;	$flag=0;