--- loncom/interface/lonprintout.pm	2003/04/30 16:35:09	1.133
+++ loncom/interface/lonprintout.pm	2003/04/30 19:25:47	1.136
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.133 2003/04/30 16:35:09 bowersj2 Exp $
+# $Id: lonprintout.pm,v 1.136 2003/04/30 19:25:47 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1524,7 +1524,11 @@ my @paperSize = ("Letter [8 1/2x11 in]",
 sub new { 
     my $self = Apache::lonhelper::element->new();
 
+    shift;
+
     $self->{'variable'} = shift;
+    my $helper = Apache::lonhelper::getHelper();
+    $helper->declareVar($self->{'variable'});
     bless($self);
     return $self;
 }
@@ -1582,6 +1586,17 @@ STATEHTML
     return $result;
 }
 
+sub postprocess {
+    my $self = shift;
+
+    my $var = $self->{'variable'};
+    my $helper = Apache::lonhelper->getHelper();
+    $helper->{VARS}->{$var} = 
+        $ENV{"form.$var.layout"} . '|' . $ENV{"form.$var.cols"} . '|' .
+        $ENV{"form.$var.paper"};
+    return 1;
+}
+
 1;
 
 __END__