--- loncom/interface/londocs.pm 2003/09/21 21:40:06 1.82 +++ loncom/interface/londocs.pm 2003/10/22 19:47:52 1.87 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.82 2003/09/21 21:40:06 www Exp $ +# $Id: londocs.pm,v 1.87 2003/10/22 19:47:52 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -138,7 +138,7 @@ sub dumpcourse { # Do the dumping unless ($outhash{'home_'.$ENV{'form.authorspace'}}) { return ''; } my ($ca,$cd)=split(/\@/,$ENV{'form.authorspace'}); - $r->print('
File | Modification Date | -Version | Differences | $lt{'fi'} | $lt{'md'} | $lt{'mr'} | +$lt{'ve'} | $lt{'vu'} | $lt{'di'} | ENDHEADERS foreach (keys %changes) { if ($changes{$_}>$starttime) { @@ -626,8 +641,12 @@ ENDHEADERS $r->print( '
---|---|---|---|---|---|---|---|---|
'.$linkurl. ' | '. - localtime($changes{$_}).' | '.$currentversion.' | '. - ''); + &Apache::lonlocal::locallocaltime($changes{$_}).' | '. + $currentversion.' | '); +# Used in course + $r->print(' | '); +# Set version + $r->print(' | ');
my $lastold=1;
for (my $prevvers=1;$prevvers<$currentversion;$prevvers++) {
my $url=$root.'.'.$prevvers.'.'.$extension;
@@ -639,14 +658,14 @@ ENDHEADERS
for (my $prevvers=$lastold;$prevvers<$currentversion;$prevvers++) {
my $url=$root.'.'.$prevvers.'.'.$extension;
$r->print('Version '.$prevvers.' ('.
- localtime(&Apache::lonnet::metadata($url,'lastrevisiondate')).
+ '">'.&mt('Version').' '.$prevvers.' ('.
+ &Apache::lonlocal::locallocaltime(&Apache::lonnet::metadata($url,'lastrevisiondate')).
')');
if (&Apache::loncommon::fileembstyle($extension) eq 'ssi') {
$r->print(' Diffs');
+ '">'.&mt('Diffs').'');
}
$r->print(' '); } @@ -682,6 +701,8 @@ sub handler { 'Docs_About_Syllabus,Docs_Editing_Templated_Pages'); $help{'Simple Page'} = &Apache::loncommon::help_open_topic( 'Docs_About_Simple_Page,Docs_Editing_Templated_Pages'); + $help{'Simple Problem'} = &Apache::loncommon::help_open_topic( + 'Option_Response_Simple'); $help{'Bulletin Board'} = &Apache::loncommon::help_open_topic( 'Docs_About_Bulletin_Board,Docs_Editing_Templated_Pages'); $help{'My Personal Info'} = &Apache::loncommon::help_open_topic( @@ -1097,7 +1118,7 @@ ENDFORM +value="$lt{'selm'}">$help{'Load_Map'} |