[LON-CAPA-cvs] cvs: loncom /interface longroupchat.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Thu, 18 May 2006 17:58:14 -0000
albertel Thu May 18 13:58:14 2006 EDT
Modified files:
/loncom/interface longroupchat.pm
Log:
- sending page headers
Index: loncom/interface/longroupchat.pm
diff -u loncom/interface/longroupchat.pm:1.6 loncom/interface/longroupchat.pm:1.7
--- loncom/interface/longroupchat.pm:1.6 Wed May 17 21:08:50 2006
+++ loncom/interface/longroupchat.pm Thu May 18 13:58:14 2006
@@ -26,10 +26,11 @@
package Apache::longroupchat;
use strict;
+use Apache::Constants qw(:common);
use Apache::lonnet;
-use Apache::loncommon;
+use Apache::loncommon();
use Apache::lonlocal;
-use Apache::longroup;
+use Apache::longroup();
sub handler {
my ($r) = @_;
@@ -48,6 +49,9 @@
}
}
+ &Apache::loncommon::content_type($r,'text/html');
+ $r->send_http_header;
+ return OK if $r->header_only;
my $start_page =
&Apache::loncommon::start_page($grouptitle,undef,
{'frameset' => 1,