--- loncom/interface/londocs.pm 2006/11/15 14:33:46 1.253
+++ loncom/interface/londocs.pm 2006/11/22 14:07:13 1.256
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.253 2006/11/15 14:33:46 www Exp $
+# $Id: londocs.pm,v 1.256 2006/11/22 14:07:13 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1062,32 +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().
@@ -1158,8 +1158,10 @@ sub docs_change_log {
$r->print(&LONCAPA::map::qtescape((split(/\:/,$docslog{$id}{'logentry'}{'parameter_res'}))[0]).':');
foreach my $parameter ('randompick','hiddenresource','encrypturl') {
if ($docslog{$id}{'logentry'}{'parameter_action_'.$parameter}) {
- $r->print('- '.$lt{$parameter}.' '.$lt{$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('
');
@@ -2357,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
@@ -2551,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',
@@ -2590,7 +2594,7 @@ sub handler {
$containertag