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

Diff for /loncom/interface/lonprintout.pm between versions 1.691 and 1.695

version 1.691, 2023/04/16 01:33:04 version 1.695, 2024/10/16 17:48:08
Line 1861  my %page_formats= Line 1861  my %page_formats=
     ('letter' => {      ('letter' => {
  'book' => {   'book' => {
      '1' => [ '7.1 in','9.8 in', '-0.57 in','-0.57 in','0.275 in'],       '1' => [ '7.1 in','9.8 in', '-0.57 in','-0.57 in','0.275 in'],
      '2' => ['3.66 in','9.8 in', '-0.57 in','-0.57 in','0.275 in']       '2' => ['3.66 in','9.8 in', '-0.57 in','-0.57 in','-0.4 in']
  },   },
  'album' => {   'album' => {
      '1' => [ '8.8 in', '6.8 in','-0.55 in',  '-0.55 in','0.394 in'],       '1' => [ '8.8 in', '6.8 in','-0.55 in',  '-0.55 in','0.394 in'],
      '2' => [ '4.8 in', '6.8 in','-0.5 in', '-1.0 in','3.5 in']       '2' => [ '4.8 in', '6.8 in','-0.5 in', '-1.0 in','3.25 in']
  },   },
      },       },
      'legal' => {       'legal' => {
Line 3310  ENDPART Line 3310  ENDPART
                  ($map, my $id, my $resource) =                   ($map, my $id, my $resource) =
                      &Apache::lonnet::decode_symb($helper->{VARS}->{'symb'});                       &Apache::lonnet::decode_symb($helper->{VARS}->{'symb'});
              }               }
            } elsif (($helper->{'VARS'}->{'postdata'} eq '/adm/navmaps') && ($perm{'pfo'})) {
                $map = $helper->{'VARS'}->{'SEQUENCE'};
          }           }
   
  #loop over students   #loop over students
Line 3399  ENDPART Line 3401  ENDPART
          if ($helper->{VARS}{'symb'}) {           if ($helper->{VARS}{'symb'}) {
              ($map, my $id, my $resource) =               ($map, my $id, my $resource) =
                  &Apache::lonnet::decode_symb($helper->{VARS}{'symb'});                   &Apache::lonnet::decode_symb($helper->{VARS}{'symb'});
            } elsif (($helper->{'VARS'}->{'postdata'} eq '/adm/navmaps') && ($perm{'pfo'})) {
                $map = $helper->{'VARS'}->{'SEQUENCE'};
          }           }
  my %moreenv = ('textwidth' => &get_textwidth($helper,$LaTeXwidth));   my %moreenv = ('textwidth' => &get_textwidth($helper,$LaTeXwidth));
  $moreenv{'problem_split'}    = $parmhash{'problem_stream_switch'};   $moreenv{'problem_split'}    = $parmhash{'problem_stream_switch'};
Line 4825  CHOOSE_FROM_SUBDIR Line 4829  CHOOSE_FROM_SUBDIR
                         &generate_common_choosers($r,$helper,$escapedSequenceName,$escapedSequenceName,                          &generate_common_choosers($r,$helper,$escapedSequenceName,$escapedSequenceName,
                                                   $isProblem,$symbFilter,$start_new_option);                                                    $isProblem,$symbFilter,$start_new_option);
   
                     my $resource_selector .= <<RESOURCE_SELECTOR;                      my $resource_selector = <<RESOURCE_SELECTOR;
   <state name="CHOOSE_STUDENTS2" title="Select Students and Resources">    <state name="CHOOSE_STUDENTS2" title="Select Students and Resources">
     <choices variable='student_sort'>      <choices variable='student_sort'>
       <choice computer='0'>Sort by section then student</choice>        <choice computer='0'>Sort by section then student</choice>
Line 4840  CHOOSE_FROM_SUBDIR Line 4844  CHOOSE_FROM_SUBDIR
     <nextstate>PRINT_FORMATTING</nextstate>      <nextstate>PRINT_FORMATTING</nextstate>
     <message>(mark desired resources then click "next" button) <br /></message>      <message>(mark desired resources then click "next" button) <br /></message>
     <resource variable="RESOURCES" multichoice="1" addstatus="1"      <resource variable="RESOURCES" multichoice="1" addstatus="1"
               closeallpages="1" modallink="1">                closeallpages="1" modallink="1" suppressNavmap="1" $nocurrloc>
       <filterfunc>return $isNotMap;</filterfunc>        <filterfunc>return $isNotMap;</filterfunc>
       <mapurl>$map</mapurl>        <mapurl>$escapedSequenceName</mapurl>
       <valuefunc>return $symbFilter;</valuefunc>        <valuefunc>return $symbFilter;</valuefunc>
       $start_new_option        $start_new_option
       </resource>        </resource>
Removed from v.1.691  
changed lines
  Added in v.1.695

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