[BACK]Return to loncourserespicker.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncourserespicker.pm between versions 1.1 and 1.4

version 1.1, 2012/03/31 12:02:21 version 1.4, 2013/01/14 18:47:14
Line 148  use Apache::lonnet; Line 148  use Apache::lonnet;
 use Apache::loncommon;  use Apache::loncommon;
 use Apache::lonhtmlcommon;  use Apache::lonhtmlcommon;
 use Apache::lonnavmaps;  use Apache::lonnavmaps;
   use Apache::londocs;
 use Apache::lonlocal;  use Apache::lonlocal;
 use LONCAPA qw(:DEFAULT :match);  use LONCAPA qw(:DEFAULT :match);
   
Line 218  sub create_picker { Line 219  sub create_picker {
                 ' onclick="javascript:checkAll(document.'.$formname.'.discussion)" />'.                  ' onclick="javascript:checkAll(document.'.$formname.'.discussion)" />'.
                 '&nbsp;&nbsp;<input type="button" value="'.&mt('uncheck all').'"'.                  '&nbsp;&nbsp;<input type="button" value="'.&mt('uncheck all').'"'.
                 ' onclick="javascript:uncheckAll(document.'.$formname.'.discussion)" />'.                  ' onclick="javascript:uncheckAll(document.'.$formname.'.discussion)" />'.
                 '</fieldset></div>';                  '</fieldset>';
         }          }
           $display .= '</div>';      
     }      }
     my $curRes;  
     my $lastcontainer = $startcount;      my $lastcontainer = $startcount;
     $display .= &Apache::loncommon::start_data_table()      $display .= &Apache::loncommon::start_data_table()
                .&Apache::loncommon::start_data_table_header_row();                 .&Apache::loncommon::start_data_table_header_row();
Line 281  sub create_picker { Line 282  sub create_picker {
             }              }
             my $icon = 'src="'.$location.'/unknown.gif" alt=""';              my $icon = 'src="'.$location.'/unknown.gif" alt=""';
             if ($curRes->is_sequence()) {              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()) {              } elsif ($curRes->is_page()) {
                 $icon = 'src="'.$location.'/navmap.page.open.gif" alt="'.&mt('Composite Page').'"';                  $icon = 'src="'.$location.'/navmap.page.open.gif" alt="'.&mt('Composite Page').'"';
             } elsif ($curRes->is_problem()) {              } elsif ($curRes->is_problem()) {
Line 340  sub create_picker { Line 341  sub create_picker {
     } elsif ($context eq 'examblock') {      } elsif ($context eq 'examblock') {
         $display .=          $display .=
             '<input type="submit" name="resourceblocks" value="'.              '<input type="submit" name="resourceblocks" value="'.
             &mt('Copy Choices to Main Window ').'" />';              &mt('Copy Choices to Main Window').'" />';
     }      }
     $display .= '</p></form>';      $display .= '</p></form>';
     my $numcount = $count + $boards + $startcount;      my $numcount = $count + $boards + $startcount;
Line 356  sub create_picker { Line 357  sub create_picker {
                  'add_entries' => { onload => 'javascript:recurseFolders();' },                    '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') {      if ($context eq 'imsexport') {
         $output .= &Apache::lonhtmlcommon::breadcrumbs('IMS Export');          $output .= &Apache::lonhtmlcommon::breadcrumbs('IMS Export').
                      &Apache::londocs::startContentScreen('tools');
     }      }
     $output .= $display;      $output .= $display;
     if ($context eq 'examblock') {      if ($context eq 'examblock') {
         $output .= &Apache::loncommon::end_page();          $output .= &Apache::loncommon::end_page();
       } elsif ($context eq 'imsexport') {
           $output .= &Apache::londocs::endContentScreen();
     }      }
     return $output;      return $output;
 }  }
Removed from v.1.1  
changed lines
  Added in v.1.4

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>