--- loncom/auth/lonauth.pm	2003/04/07 18:24:05	1.48
+++ loncom/auth/lonauth.pm	2003/05/23 21:18:56	1.50
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # User Authentication Module
 #
-# $Id: lonauth.pm,v 1.48 2003/04/07 18:24:05 www Exp $
+# $Id: lonauth.pm,v 1.50 2003/05/23 21:18:56 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -172,7 +172,7 @@ sub success {
     my $startupremote=&Apache::lonmenu::startupremote($lowerurl);
     my $setflags=&Apache::lonmenu::setflags();
     my $maincall=&Apache::lonmenu::maincall();
-    my $bodytag=&Apache::loncommon::bodytag('Successful Login');
+    my $bodytag=&Apache::loncommon::bodytag('Successful Login',undef,' ');
 # ------------------------------------------------- Output for successful login
 
     $r->send_cgi_header(<<ENDHEADER);
@@ -232,7 +232,7 @@ sub handler {
     my $r = shift;
 
     my $buffer;
-    $r->read($buffer,$r->header_in('Content-length'));
+    $r->read($buffer,$r->header_in('Content-length'),0);
     my @pairs=split(/&/,$buffer);
     my $pair; my $name; my $value;
     undef %FORM;