--- loncom/auth/lonauth.pm	2001/11/29 19:12:44	1.27
+++ loncom/auth/lonauth.pm	2002/05/06 21:55:25	1.30
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # User Authentication Module
 #
-# $Id: lonauth.pm,v 1.27 2001/11/29 19:12:44 www Exp $
+# $Id: lonauth.pm,v 1.30 2002/05/06 21:55:25 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -143,6 +143,7 @@ sub success {
 	    $idf->close();
         }
          $ENV{'request.role'}='cm';
+         $ENV{'browser.type'}=$clientbrowser;
 # -------------------------------------------------------------------- Log this
 
     &Apache::lonnet::log($domain,$username,$authhost,
@@ -163,7 +164,7 @@ sub success {
 # -------------------------------------------------------- Menu script and info
     my $windowinfo=&Apache::lonmenu::open();
 # ------------------------------------------------------------- Info for Remote
-    my $configmenu=&Apache::lonmenu::rawconfig();
+    my $configmenu=&Apache::lonmenu::rawconfig($r);
 # ------------------------------------------------- Output for successful login
 
     $r->send_cgi_header(<<ENDHEADER);
@@ -184,7 +185,7 @@ function checkdef() {
 }
 
 // ---------------------------------------------------------- The wait function
-
+var canceltim;
 function wait() {
    if ((menuloaded==1) || (tim==1)) {
       if (tim==0) {