[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface lonprintout.pm

raeburn raeburn at source.lon-capa.org
Thu Apr 24 11:36:59 EDT 2014


raeburn		Thu Apr 24 15:36:59 2014 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonprintout.pm 
  Log:
  - For 2.11
    - Backport 1.642
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.627.2.11 loncom/interface/lonprintout.pm:1.627.2.12
--- loncom/interface/lonprintout.pm:1.627.2.11	Wed Feb 19 02:26:13 2014
+++ loncom/interface/lonprintout.pm	Thu Apr 24 15:36:58 2014
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.627.2.11 2014/02/19 02:26:13 raeburn Exp $
+# $Id: lonprintout.pm,v 1.627.2.12 2014/04/24 15:36:58 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3618,7 +3618,6 @@
     #
 
     my $syllabus_first = 0;
-    my $assessment_first = 0;
     my $current_assignment = "";
     my $assignment;
     my $courseidinfo = &get_course();
@@ -3642,9 +3641,6 @@
 	    if ($print_incomplete && !&incomplete($username, $userdomain, $res_url)) {
 		next;
 	    }
-            if ((!$actually_printed) && ($curresline =~ m/$LONCAPA::assess_re/)) {
-                $assessment_first = 1;
-            }
 	    $actually_printed++; # we're going to print one.
 
 	    if (&Apache::lonnet::allowed('bre',$res_url)) {
@@ -3779,16 +3775,13 @@
     if ($syllabus_first) {
         $current_output =~ s/\\\\ Last updated:/Last updated:/
     }
-    my $newheader;
-    unless (($assessment_first) && ($actually_printed > 1)) {
-        my $currentassignment=&Apache::lonxml::latex_special_symbols($helper->{VARS}->{'assignment'},'header');
-        my $header_line =
-	    &format_page_header($LaTeXwidth, $parmhash{'print_header_format'},
-				$currentassignment, $courseidinfo, $fullname);
-	my $header_start = ($columns_in_format == 1) ? '\lhead'
-	    : '\fancyhead[LO]';
-	$newheader = $header_start.'{'.$header_line.'}';
-    }
+    my $currentassignment=&Apache::lonxml::latex_special_symbols($helper->{VARS}->{'assignment'},'header');
+    my $header_line =
+        &format_page_header($LaTeXwidth, $parmhash{'print_header_format'},
+                            $currentassignment, $courseidinfo, $fullname);
+    my $header_start = ($columns_in_format == 1) ? '\lhead' : '\fancyhead[LO]';
+    my $newheader = $header_start.'{'.$header_line.'}';
+
     if ($current_output=~/\\documentclass/) {
 	$current_output =~ s/\\begin{document}/\\setlength{\\topmargin}{1cm} \\begin{document}\\noindent\\parbox{\\minipagewidth}{\\noindent$newheader$namepostfix}\\vskip 5 mm /;
     } else {




More information about the LON-CAPA-cvs mailing list