--- loncom/interface/londocs.pm 2006/11/13 22:32:56 1.252
+++ loncom/interface/londocs.pm 2006/11/22 03:56:36 1.255
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.252 2006/11/13 22:32:56 www Exp $
+# $Id: londocs.pm,v 1.255 2006/11/22 03:56:36 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1062,27 +1062,32 @@ sub docs_change_log {
my ($r)=@_;
$r->print(&Apache::loncommon::start_page('Course Document Change Log'));
$r->print(&Apache::lonhtmlcommon::breadcrumbs('Course Document Change Log'));
-
+
my %docslog=&Apache::lonnet::dump('nohist_docslog',
$env{'course.'.$env{'request.course.id'}.'.domain'},
$env{'course.'.$env{'request.course.id'}.'.num'});
-
+
if ((keys(%docslog))[0]=~/^error\:/) { undef(%docslog); }
-
+
$r->print('
');
$r->print(&Apache::loncommon::start_data_table().&Apache::loncommon::start_data_table_header_row().
@@ -1151,10 +1156,12 @@ sub docs_change_log {
$r->print('');
if ($docslog{$id}{'logentry'}{'parameter_res'}) {
$r->print(&LONCAPA::map::qtescape((split(/\:/,$docslog{$id}{'logentry'}{'parameter_res'}))[0]).':');
- foreach my $parameter ('randompick','hiddenresource','encrypturl]') {
+ foreach my $parameter ('randompick','hiddenresource','encrypturl') {
if ($docslog{$id}{'logentry'}{'parameter_action_'.$parameter}) {
- $r->print('- '.$parameter.' '.$docslog{$id}{'logentry'}{'parameter_action_'.$parameter}.' '.
- $docslog{$id}{'logentry'}{'parameter_value_'.$parameter}.'
');
+ $r->print('- '.
+ &mt($lt{$parameter}.' '.$lt{$docslog{$id}{'logentry'}{'parameter_action_'.$parameter}}.' [_1]',
+ $docslog{$id}{'logentry'}{'parameter_value_'.$parameter})
+ .'
');
}
}
$r->print('
');
@@ -2352,6 +2359,7 @@ sub handler {
'Docs_About_Bulletin_Board,Docs_Editing_Templated_Pages');
$help{'My Personal Info'} = &Apache::loncommon::help_open_topic(
'Docs_About_My_Personal_Info,Docs_Editing_Templated_Pages');
+ $help{'Group Files'} = &Apache::loncommon::help_open_topic('Docs_About_Group_Files');
$help{'Caching'} = &Apache::loncommon::help_open_topic('Caching');
# does this user have privileges to modify docs
@@ -2546,6 +2554,7 @@ sub handler {
'scuf' => 'Score Upload Form',
'bull' => 'Bulletin Board',
'mypi' => 'My Personal Info',
+ 'grpo' => 'Group Files',
'abou' => 'About User',
'imsf' => 'Import IMS package',
'file' => 'File',
@@ -2810,6 +2819,15 @@ $uploadtag
onClick="javascript:makeabout();" />
+
ENDFORM
}
if ($env{'form.pagepath'}) {