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

[raeburn]

raeburn		Mon Nov 11 03:20:46 2024 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  - Fix typo in page height for letter-sized paper, and modify top margin for
    accordingly. 
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.703 loncom/interface/lonprintout.pm:1.704
--- loncom/interface/lonprintout.pm:1.703	Mon Nov 11 00:43:39 2024
+++ loncom/interface/lonprintout.pm	Mon Nov 11 03:20:46 2024
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.703 2024/11/11 00:43:39 raeburn Exp $
+# $Id: lonprintout.pm,v 1.704 2024/11/11 03:20:46 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1861,8 +1861,8 @@
 my %page_formats=
     ('letter' => {
 	 'book' => {
-	     '1' => [ '7.1 in','9.7 in', '-0.57 in','-0.57 in','0.1 in'],
-	     '2' => ['3.66 in','9.8 in', '-0.57 in','-0.57 in','0.1 in']
+	     '1' => [ '7.1 in','9.7 in', '-0.57 in','-0.57 in','-0.5 in'],
+	     '2' => ['3.66 in','9.8 in', '-0.57 in','-0.57 in','-0.5 in']
 	 },
 	 'album' => {
 	     '1' => [ '8.8 in', '6.8 in','-0.55 in',  '-0.55 in','-0.5 in'],
@@ -2027,13 +2027,13 @@
 	    $text =~ s/\\begin\{document}/\\setlength{\\oddsidemargin}{$oddoffset}\\setlength{\\evensidemargin}{$evenoffset}$topmargintoinsert\n\\setlength{\\textwidth}{$textwidth}\\setlength{\\textheight}{$textheight}\\setlength{\\textfloatsep}{8pt plus 2\.0pt minus 4\.0pt}\n\\newlength{\\minipagewidth}\\setlength{\\minipagewidth}{\\textwidth\/\$number_of_columns-0\.2cm}\\usepackage{fancyhdr}\\addtolength{\\headheight}{\\baselineskip}\n\\pagestyle{fancy}$fancypagestatement\\usepackage{booktabs}\\begin{document}\\voffset=-0\.8 cm\\setcounter{page}{1}\n /;
         if ($papersize eq 'a4') {
             $paperwidth = '29.7cm';
-            $paperheight = '21cm';
+            $paperheight = '21.0cm';
         } elsif ($numberofcolumns eq '1') {
             if ($papersize eq 'letter') {
-                $paperwidth = '11in';
+                $paperwidth = '11.0in';
                 $paperheight = '8.5in';
             } elsif ($papersize eq 'legal') {
-                $paperwidth = '14in';
+                $paperwidth = '14.0in';
                 $paperheight = '8.5in';
             }
         }
@@ -2044,11 +2044,11 @@
 	    $text =~ s/\\pagestyle\{fancy}\\rhead\{}\\chead\{}\s*\\begin\{document}/\\textheight = $textheight\\oddsidemargin = $evenoffset\n\\evensidemargin = $evenoffset $topmargintoinsert\\textwidth= $textwidth\\newlength{\\minipagewidth}\n\\setlength{\\minipagewidth}{\\textwidth\/\$number_of_columns-0\.2cm}\\renewcommand{\\ref}{\\keephidden\}\\pagestyle{fancy}\\rhead{}\\chead{}\\usepackage{booktabs}\\begin{document}\\voffset=-0\.8cm\n\\setcounter{page}{1}  \\vskip 5 mm\n /;
 	}
         if ($papersize eq 'a4') {
-            $paperwidth = '21cm';
+            $paperwidth = '21.0cm';
             $paperheight = '29.7cm';
         } elsif ($papersize eq 'letter') {
             $paperwidth = '8.5in';
-            $paperheight = '11.5in';
+            $paperheight = '11.0in';
          } elsif ($papersize eq 'legal') {
             $paperwidth = '8.5in';
             $paperheight = '14.0in';