--- loncom/lonnet/perl/lonnet.pm	2002/11/27 15:33:10	1.303
+++ loncom/lonnet/perl/lonnet.pm	2002/12/04 15:23:39	1.304
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.303 2002/11/27 15:33:10 matthew Exp $
+# $Id: lonnet.pm,v 1.304 2002/12/04 15:23:39 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -840,7 +840,8 @@ sub tokenwrapper {
     if ($uri=~/^uploaded\/([^\/]+)\/([^\/]+)\/([^\/]+)(\?\.*)*$/) {
 	&appenv('userfile.'.$1.'/'.$2.'/'.$3 => $ENV{'request.course.id'});
         return 'http://'.$hostname{ &homeserver($2,$1)}.'/'.$uri.
-               (($uri=~/\?/)?'&':'?').'token='.$token;
+               (($uri=~/\?/)?'&':'?').'token='.$token.
+                               '&tokenissued='.$perlvar{'lonHostID'};
     } else {
 	return '/adm/notfound.html';
     }