[LON-CAPA-cvs] cvs: loncom(version_0_5_1) /lonnet/perl lonnet.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Fri, 30 Aug 2002 19:11:28 -0000
albertel Fri Aug 30 15:11:28 2002 EDT
Modified files: (Branch: version_0_5_1)
/loncom/lonnet/perl lonnet.pm
Log:
- recommitting metadata update,
Index: loncom/lonnet/perl/lonnet.pm
diff -u loncom/lonnet/perl/lonnet.pm:1.267.4.1 loncom/lonnet/perl/lonnet.pm:1.267.4.2
--- loncom/lonnet/perl/lonnet.pm:1.267.4.1 Fri Aug 30 15:09:27 2002
+++ loncom/lonnet/perl/lonnet.pm Fri Aug 30 15:11:28 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network
# TCP networking package
#
-# $Id: lonnet.pm,v 1.267.4.1 2002/08/30 19:09:27 albertel Exp $
+# $Id: lonnet.pm,v 1.267.4.2 2002/08/30 19:11:28 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2833,8 +2833,9 @@
# the next is the end of "start tag"
}
}
- &metadata_generate_part0(\%metathesekeys,\%metacache,$uri);
$metacache{$uri.':keys'}=join(',',keys %metathesekeys);
+ &metadata_generate_part0(\%metathesekeys,\%metacache,$uri);
+ $metacache{$uri.':allpossiblekeys'}=join(',',keys %metathesekeys);
$metacache{$uri.':cachedtimestamp'}=time;
# this is the end of "was not already recently cached
}