--- loncom/interface/loncourserespicker.pm 2012/03/31 12:02:21 1.1 +++ loncom/interface/loncourserespicker.pm 2013/01/15 17:39:58 1.5 @@ -1,6 +1,6 @@ # The LearningOnline Network # -# $Id: loncourserespicker.pm,v 1.1 2012/03/31 12:02:21 raeburn Exp $ +# $Id: loncourserespicker.pm,v 1.5 2013/01/15 17:39:58 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -148,6 +148,7 @@ use Apache::lonnet; use Apache::loncommon; use Apache::lonhtmlcommon; use Apache::lonnavmaps; +use Apache::londocs; use Apache::lonlocal; use LONCAPA qw(:DEFAULT :match); @@ -218,10 +219,10 @@ sub create_picker { ' onclick="javascript:checkAll(document.'.$formname.'.discussion)" />'. '  '. - ''; + ''; } + $display .= ''; } - my $curRes; my $lastcontainer = $startcount; $display .= &Apache::loncommon::start_data_table() .&Apache::loncommon::start_data_table_header_row(); @@ -281,7 +282,7 @@ sub create_picker { } my $icon = 'src="'.$location.'/unknown.gif" alt=""'; if ($curRes->is_sequence()) { - $icon = 'src="'.$location.'/navmap.folder.open.gif" alt="'.&mt('"Folder').'"'; + $icon = 'src="'.$location.'/navmap.folder.open.gif" alt="'.&mt('Folder').'"'; } elsif ($curRes->is_page()) { $icon = 'src="'.$location.'/navmap.page.open.gif" alt="'.&mt('Composite Page').'"'; } elsif ($curRes->is_problem()) { @@ -340,7 +341,7 @@ sub create_picker { } elsif ($context eq 'examblock') { $display .= ''; + &mt('Copy Choices to Main Window').'" />'; } $display .= '

'; my $numcount = $count + $boards + $startcount; @@ -356,13 +357,16 @@ sub create_picker { 'add_entries' => { onload => 'javascript:recurseFolders();' }, }; } - my $output = &Apache::loncommon::start_page($title,$scripttag,$args); + $output = &Apache::loncommon::start_page($title,$scripttag,$args); if ($context eq 'imsexport') { - $output .= &Apache::lonhtmlcommon::breadcrumbs('IMS Export'); + $output .= &Apache::lonhtmlcommon::breadcrumbs('IMS Export'). + &Apache::londocs::startContentScreen('tools'); } $output .= $display; if ($context eq 'examblock') { $output .= &Apache::loncommon::end_page(); + } elsif ($context eq 'imsexport') { + $output .= &Apache::londocs::endContentScreen(); } return $output; } @@ -552,7 +556,7 @@ sub get_navmap_object { $outcome .= &mt('Return to Course Editor'); } $outcome .= ''; - &logthis('IMS export failed - could not create navmap object in '.lc($crstype).':'.$env{'request.course.id'}); + &Apache::lonnet::logthis('IMS export failed - could not create navmap object in '.lc($crstype).':'.$env{'request.course.id'}); } elsif ($context eq 'examblock') { $outcome .= ''.&mt('Close window').''; }