loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.178.2.4, 2004/02/24 16:51:40	version 1.178.2.5, 2004/02/24 16:52:16
Line 1870 sub DumpWithRegexp {	Line 1870 sub DumpWithRegexp {
my %hash;	my %hash;
if (tie(%hash,'GDBM_File',"$proname/$namespace.db",	if (tie(%hash,'GDBM_File',"$proname/$namespace.db",
&GDBM_READER(),0640)) {	&GDBM_READER(),0640)) {
study($regexp);
while (my ($key,$value) = each(%hash)) {	while (my ($key,$value) = each(%hash)) {
if ($regexp eq '.') {	if ($regexp eq '.') {
$qresult.=$key.'='.$value.'&';	$qresult.=$key.'='.$value.'&';