--- loncom/auth/lonauth.pm	2005/11/15 17:55:03	1.72
+++ loncom/auth/lonauth.pm	2006/01/19 22:14:38	1.73
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # User Authentication Module
 #
-# $Id: lonauth.pm,v 1.72 2005/11/15 17:55:03 www Exp $
+# $Id: lonauth.pm,v 1.73 2006/01/19 22:14:38 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -114,6 +114,8 @@ sub success {
     my %userenv=Apache::lonnet::dump('environment',$domain,$username);
     my ($tmp) = keys(%userenv);
     if ($tmp !~ /^(con_lost|error|no_such_host)/i) {
+	# default remote control to off
+	if ($userenv{'remote'} ne 'on') { $userenv{'remote'} = 'off'; }
 	foreach my $key (keys(%userenv)) {
 	    $userenv.="environment.$key=$userenv{$key}\n";
 	}