|
version 1.383, 2019/08/12 16:45:48
|
version 1.384, 2020/12/18 15:23:02
|
|
Line 3183 sub adddiscuss {
|
Line 3183 sub adddiscuss {
|
| if (($symb) && ($email)) { |
if (($symb) && ($email)) { |
| my $now = time; |
my $now = time; |
| if ($env{'form.editdisc'}) { |
if ($env{'form.editdisc'}) { |
| $contrib{'ip'}=$ENV{'REMOTE_ADDR'}; |
$contrib{'ip'}=&Apache::lonnet::get_requestor_ip(); |
| $contrib{'host'}=$Apache::lonnet::perlvar{'lonHostID'}; |
$contrib{'host'}=$Apache::lonnet::perlvar{'lonHostID'}; |
| $contrib{'timestamp'} = $now; |
$contrib{'timestamp'} = $now; |
| $contrib{'history'} = ''; |
$contrib{'history'} = ''; |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonfeedback.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface