--- loncom/lonnet/perl/lonnet.pm 2021/02/01 00:20:56 1.1440 +++ loncom/lonnet/perl/lonnet.pm 2021/02/08 14:10:17 1.1441 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1440 2021/02/01 00:20:56 raeburn Exp $ +# $Id: lonnet.pm,v 1.1441 2021/02/08 14:10:17 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -12419,7 +12419,7 @@ sub EXT { } } elsif ($realm eq 'client') { if ($space eq 'remote_addr') { - return $ENV{'REMOTE_ADDR'}; + return &get_requestor_ip(); } } return '';