--- loncom/interface/lonprintout.pm	2006/11/02 21:06:06	1.491
+++ loncom/interface/lonprintout.pm	2007/01/08 19:07:58	1.494
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.491 2006/11/02 21:06:06 albertel Exp $
+# $Id: lonprintout.pm,v 1.494 2007/01/08 19:07:58 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -490,7 +490,7 @@ sub character_chart {
     $result =~ s/&\#147;/\`\`/g;
     $result =~ s/&\#148;/\'\'/g;
     $result =~ s/&\#149;/\\ensuremath\{\\bullet\}/g;
-    $result =~ s/&\#150;/--/g;
+    $result =~ s/&(\#150|\#8211);/--/g;
     $result =~ s/&\#151;/---/g;
     $result =~ s/&\#152;/\\ensuremath\{\\sim\}/g;
     $result =~ s/&\#153;/\\texttrademark /g;
@@ -705,11 +705,11 @@ sub character_chart {
 my %page_formats=
     ('letter' => {
 	 'book' => {
-	     '1' => [ '7.1 in','9.8 in', '-0.57 in','-0.57 in','0.7 cm'],
-	     '2' => ['3.66 in','9.8 in', '-0.57 in','-0.57 in','0.7 cm']
+	     '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']
 	 },
 	 'album' => {
-	     '1' => [ '8.8 in', '6.8 in','-0.55 in',  '-0.55 in','1 cm'],
+	     '1' => [ '8.8 in', '6.8 in','-0.55 in',  '-0.55 in','1.0 in'],
 	     '2' => [ '4.8 in', '6.8 in','-0.5 in', '-1.0 in','3.5 in']
 	 },
      },
@@ -765,12 +765,12 @@ my %page_formats=
      },
      'a4' => {
 	 'book' => {
-	     '1' => ['17.6 cm','27.2 cm','-0.55  in','-0.83 in','-0.5 in'],
-	     '2' => [ '9.1 cm','27.2 cm','-0.55  in','-0.83 in','-0.5 in']
+	     '1' => ['17.6 cm','27.2 cm','-1.397 cm','-2.11 cm','-1.27 cm'],
+	     '2' => [ '9.1 cm','27.2 cm','-1.397 c,','-2.11 cm','-1.27 cm']
 	 },
 	 'album' => {
-	     '1' => ['8.5 in','7.7 in','-0.55 in','-0.83 in','0 in'],
-	     '2' => ['3.9 in','7.7 in','-0.55 in','-0.83 in','0 in']
+	     '1' => ['21.59 cm','19.558 cm','-1.27 cm','-2.11 cm','0 cm'],
+	     '2' => ['9.91 cm','19.558 cm','-1.397 cm','-2.11 cm','0 cm']
 	 },
      },
      'a5' => {
@@ -1979,9 +1979,9 @@ sub print_resources {
     my $printed = '';
     my ($username,$userdomain,$usersection) = split /:/,$person;
     my $fullname = &get_name($username,$userdomain);
-    my $namepostfix;
+    my $namepostfix = "\\\\";	# Both anon and not anon should get the same vspace.
     if ($person =~ 'anon') {
-	$namepostfix="\\\\Name: ";
+	$namepostfix .="Name: ";
 	$fullname = "CODE - ".$moreenv->{'CODE'};
     }
     #  Fullname may have special latex characters that need \ prefixing: