--- loncom/lonnet/perl/lonnet.pm 2018/03/30 18:07:47 1.1370 +++ loncom/lonnet/perl/lonnet.pm 2018/03/30 21:30:00 1.1371 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1370 2018/03/30 18:07:47 raeburn Exp $ +# $Id: lonnet.pm,v 1.1371 2018/03/30 21:30:00 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -12128,7 +12128,9 @@ sub metadata { $metaentry{':keys'} = join(',',keys(%metathesekeys)); &metadata_generate_part0(\%metathesekeys,\%metaentry,$uri); $metaentry{':allpossiblekeys'}=join(',',keys(%metathesekeys)); - &do_cache_new('meta',$uri,\%metaentry,$cachetime); + unless ($liburi) { + &do_cache_new('meta',$uri,\%metaentry,$cachetime); + } # this is the end of "was not already recently cached } return $metaentry{':'.$what}; @@ -14851,7 +14853,9 @@ only used internally for recursive metad the toolsymb is only used where the uri is for an external tool (for which the uri as well as the symb are guaranteed to be unique). -this function automatically caches all requests +this function automatically caches all requests except any made recursively +to retrieve a list of metadata keys for an imported library file ($liburi is +defined). =item *