--- loncom/lonnet/perl/lonnet.pm	2012/03/16 21:16:46	1.1160
+++ loncom/lonnet/perl/lonnet.pm	2012/03/20 13:36:22	1.1161
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.1160 2012/03/16 21:16:46 www Exp $
+# $Id: lonnet.pm,v 1.1161 2012/03/20 13:36:22 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -9424,6 +9424,7 @@ sub gettitle {
 	if ($title) {
 # Remember both $symb and $title for dynamic metadata
             $accesshash{$symb.'___crstitle'}=$title;
+            $accesshash{&declutter($map).'___'.&declutter($url).'___usage'}=time;
 # Cache this title and then return it
 	    return &do_cache_new('title',$key,$title,600);
 	}