--- loncom/interface/lonfeedback.pm 2019/08/07 16:08:04 1.381 +++ loncom/interface/lonfeedback.pm 2020/12/18 15:23:02 1.384 @@ -1,7 +1,7 @@ # The LearningOnline Network # Feedback # -# $Id: lonfeedback.pm,v 1.381 2019/08/07 16:08:04 raeburn Exp $ +# $Id: lonfeedback.pm,v 1.384 2020/12/18 15:23:02 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2061,7 +2061,7 @@ END $r->print(< $lt{'atta'} $attachmaxtext: - +

END } @@ -3183,7 +3183,7 @@ sub adddiscuss { if (($symb) && ($email)) { my $now = time; if ($env{'form.editdisc'}) { - $contrib{'ip'}=$ENV{'REMOTE_ADDR'}; + $contrib{'ip'}=&Apache::lonnet::get_requestor_ip(); $contrib{'host'}=$Apache::lonnet::perlvar{'lonHostID'}; $contrib{'timestamp'} = $now; $contrib{'history'} = ''; @@ -3561,7 +3561,7 @@ END $r->print(&Apache::lonhtmlcommon::row_closure()); $r->print(&Apache::lonhtmlcommon::row_title($lt{'adda'})); $r->print('' - .'' + .'' .' '.$attachmaxtext); if(($idx)||(ref($currnewattach) eq 'ARRAY') && (@{$currnewattach} > 0)){