--- loncom/interface/lonchat.pm 2002/08/08 13:44:17 1.3
+++ loncom/interface/lonchat.pm 2002/09/09 21:01:58 1.4
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Chat
#
-# $Id: lonchat.pm,v 1.3 2002/08/08 13:44:17 www Exp $
+# $Id: lonchat.pm,v 1.4 2002/09/09 21:01:58 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -37,7 +37,7 @@ sub handler {
$r->send_http_header;
return OK if $r->header_only;
- if ($ENV{'form.newentry'}) {
+ if ($ENV{'form.newchat'}) {
&Apache::lonnet::chatsend($ENV{'form.newchat'},$ENV{'form.anonymous'});
}
# --------------------------------------------------- Print login screen header
@@ -46,10 +46,10 @@ sub handler {
The LearningOnline Network with CAPA
-
-