--- loncom/interface/londocs.pm 2006/07/20 01:18:26 1.238 +++ loncom/interface/londocs.pm 2006/07/20 18:37:14 1.241 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.238 2006/07/20 01:18:26 www Exp $ +# $Id: londocs.pm,v 1.241 2006/07/20 18:37:14 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1164,7 +1164,10 @@ sub editor { $comment.':'.join(':',@rrest); } # Devalidate title cache - &Apache::lonnet::devalidate_title_cache(&Apache::lonnet::unescape($rrest[0])); + my $renamed_url=$rrest[0]; +# Has the :-escaping + $renamed_url=~s/\&colon\;/\:/g; + &Apache::lonnet::devalidate_title_cache($renamed_url); } # Store the changed version ($errtext,$fatal)=&storemap($coursenum,$coursedom, @@ -1588,7 +1591,11 @@ END } elsif ($url=~m|^/ext/|) { $url='/adm/wrapper'.$url; } - $url.=(($url=~/\?/)?'&':'?').'symb='.&escape($symb); + if (&Apache::lonnet::symbverify($symb,$url)) { + $url.=(($url=~/\?/)?'&':'?').'symb='.&escape($symb); + } else { + $url=''; + } if ($container eq 'page') { my $symb=$env{'form.pagesymb'}; @@ -1631,7 +1638,8 @@ END } $line.='