--- loncom/lonnet/perl/lonnet.pm	2000/01/14 21:12:40	1.9
+++ loncom/lonnet/perl/lonnet.pm	2000/01/21 19:08:12	1.10
@@ -199,7 +199,7 @@ sub authenticate {
     my $tryserver;
     foreach $tryserver (keys %libserv) {
 	if ($hostdom{$tryserver} eq $udom) {
-           my $answer=reply("enc:auth:$udom:$uname:$upass",$tryserver);
+           my $answer=reply("encrypt:auth:$udom:$uname:$upass",$tryserver);
            if ($answer =~ /authorized/) {
               if ($answer eq 'authorized') {
                  &logthis("User $uname at $udom authorized by $tryserver");