--- loncom/interface/lonprintout.pm 2005/05/02 11:23:22 1.375 +++ loncom/interface/lonprintout.pm 2005/06/04 20:52:37 1.376 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.375 2005/05/02 11:23:22 foxr Exp $ +# $Id: lonprintout.pm,v 1.376 2005/06/04 20:52:37 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -445,8 +445,8 @@ my %page_formats= '2' => ['3.16 in','13 in','-0.57 in','-0.57 in','-0.5 in'] }, 'album' => { - '1' => [], - '2' => [] + '1' => ['12 in','7.1 in',,'-0.57 in','-0.57 in','-0.5 in'], + '2' => ['6.0 in','7.1 in','-1 in','-1 in','5 in'] }, }, 'tabloid' => { @@ -455,8 +455,8 @@ my %page_formats= '2' => ['4.9 in','16 in','-0.57 in','-0.57 in','-0.5 in'] }, 'album' => { - '1' => [], - '2' => [] + '1' => ['16 in','9.8 in','-0.57 in','-0.57 in','-0.5 in'], + '2' => ['16 in','4.9 in','-0.57 in','-0.57 in','-0.5 in'] }, }, 'executive' => { @@ -2271,10 +2271,13 @@ use Apache::lonlocal; use Apache::lonnet; my $maxColumns = 2; +# it'd be nice if these all worked +#my @paperSize = ("letter [8 1/2x11 in]", "legal [8 1/2x14 in]", +# "tabloid (ledger) [11x17 in]", "executive [7 1/2x10 in]", +# "a2 [420x594 mm]", "a3 [297x420 mm]", "a4 [210x297 mm]", +# "a5 [148x210 mm]", "a6 [105x148 mm]" ); my @paperSize = ("letter [8 1/2x11 in]", "legal [8 1/2x14 in]", - "tabloid (ledger) [11x17 in]", "executive [7 1/2x10 in]", - "a2 [420x594 mm]", "a3 [297x420 mm]", "a4 [210x297 mm]", - "a5 [148x210 mm]", "a6 [105x148 mm]" ); + "a4 [210x297 mm]"); # Tentative format: Orientation (L = Landscape, P = portrait) | Colnum | # Paper type @@ -2310,8 +2313,8 @@ sub render { - Landscape
- Portrait +
+