--- loncom/interface/londocs.pm 2005/06/08 20:44:54 1.181 +++ loncom/interface/londocs.pm 2005/06/10 15:33:45 1.185 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.181 2005/06/08 20:44:54 www Exp $ +# $Id: londocs.pm,v 1.185 2005/06/10 15:33:45 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1077,7 +1077,9 @@ sub editor { if ($cmd eq 'del') { my (undef,$url)=split(':',$Apache::lonratedt::resources[$Apache::lonratedt::order[$idx]]); if ($url=~m|/+uploaded/\Q$coursedom\E/\Q$coursenum\E/|) { - &Apache::lonnet::removeuploadedurl($url); + unless ($url=~/\.(page|sequence|problem|exam|quiz|assess|survey|form|library)$/) { + &Apache::lonnet::removeuploadedurl($url); + } } &Apache::lonratedt::makezombie($Apache::lonratedt::order[$idx]); for (my $i=$idx;$i<$#Apache::lonratedt::order;$i++) { @@ -1865,15 +1867,15 @@ sub changewarning { if (!defined($message)) { $message='Changes will become active for your current session after [_1], or the next time you log in.'; } - $r->print( -''. -'
'. + $r->print("\n\n". +''."\n". +''. '

'. &mt($message,' '). -$help{'Caching'}.'

'); +$help{'Caching'}.''."\n\n"); } # ================================================================ Main Handler @@ -2266,7 +2268,7 @@ ENDCOURSEVERIFY $lt{'file'}:
-
+
$lt{'title'}:
@@ -2406,6 +2408,7 @@ $uploadtag +
ENDFORM } if ($env{'form.pagepath'}) { @@ -2426,8 +2429,8 @@ $uploadtag onClick="javascript:makeexamupload();" /> $help{'Score_Upload_Form'} + ENDBLOCK - $r->print(''); } $r->print(''."\n". ''); @@ -2516,7 +2519,7 @@ ENDSUPFORM } } if ($allowed) { - $r->print('
'); + $r->print('
'); } $r->print(''); } else {