--- loncom/interface/lonpickcourse.pm 2005/01/28 19:26:54 1.25 +++ loncom/interface/lonpickcourse.pm 2005/02/17 08:29:43 1.26 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a course # -# $Id: lonpickcourse.pm,v 1.25 2005/01/28 19:26:54 raeburn Exp $ +# $Id: lonpickcourse.pm,v 1.26 2005/02/17 08:29:43 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -42,8 +42,9 @@ sub handler { return OK if $r->header_only; # ------------------------------------------------------------ Print the screen + my $html=&Apache::lonxml::xmlbegin(); $r->print(< +$html The LearningOnline Network with CAPA