--- loncom/interface/londocs.pm 2006/11/15 14:33:46 1.253 +++ 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.253 2006/11/15 14:33:46 www Exp $ +# $Id: londocs.pm,v 1.255 2006/11/22 03:56:36 raeburn 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('<form action="/adm/coursedocs" method="post" name="docslog">'. '<input type="hidden" name="docslog" value="1" />'); - + my %saveable_parameters = ('show' => 'scalar',); &Apache::loncommon::store_course_settings('docs_log', \%saveable_parameters); &Apache::loncommon::restore_course_settings('docs_log', \%saveable_parameters); if (!$env{'form.show'}) { $env{'form.show'}=10; } - my %lt=&Apache::lonlocal::texthash('hiddenresource' => 'Resources hidden', - 'encrypturl' => 'URL hidden', - 'randompick' => 'Randomly pick', - 'set' => 'set to', - 'del' => 'deleted'); - + my %lt=('hiddenresource' => 'Resources hidden', + 'encrypturl' => 'URL hidden', + 'randompick' => 'Randomly pick', + 'set' => 'set to', + 'del' => 'deleted'); + my $countselect = &Apache::lonmeta::selectbox('show',$env{'form.show'},undef, (&mt('all'),10,20,50,100,1000,10000)); - + $r->print('<nobr>'.&mt('[_1] Records',$countselect).'</nobr>'. '<input type="submit" value="'.&mt('Display').'" /></form>'); $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]).':<ul>'); foreach my $parameter ('randompick','hiddenresource','encrypturl') { if ($docslog{$id}{'logentry'}{'parameter_action_'.$parameter}) { - $r->print('<li>'.$lt{$parameter}.' '.$lt{$docslog{$id}{'logentry'}{'parameter_action_'.$parameter}}.' '. - $docslog{$id}{'logentry'}{'parameter_value_'.$parameter}.'</li>'); + $r->print('<li>'. + &mt($lt{$parameter}.' '.$lt{$docslog{$id}{'logentry'}{'parameter_action_'.$parameter}}.' [_1]', + $docslog{$id}{'logentry'}{'parameter_value_'.$parameter}) + .'</li>'); } } $r->print('</ul>'); @@ -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', @@ -2815,6 +2819,15 @@ $uploadtag onClick="javascript:makeabout();" /> </nobr> </form> +<br /><form action="/adm/coursedocs" method="post" name="newgroupfiles"> +$uploadtag +<input type=hidden name="importdetail" +value="Group Files=/adm/$coursedom/$coursenum/aboutme"> +<nobr> +<input name="newgroupfiles" type="submit" value="$lt{'grpo'}" /> +$help{'Group Files'} +</nobr> +</form> ENDFORM } if ($env{'form.pagepath'}) {