Index: openacs-4/packages/xowiki/tcl/chat-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/chat-procs.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/xowiki/tcl/chat-procs.tcl 8 Apr 2006 00:11:53 -0000 1.5 +++ openacs-4/packages/xowiki/tcl/chat-procs.tcl 8 Apr 2006 15:00:44 -0000 1.6 @@ -44,7 +44,7 @@ if {![info exists mode]} { set mode polling set user_agent [string tolower [ns_set get [ns_conn headers] User-Agent]] - if {[regexp (firefox|msie) $user_agent] && [info command ::thread::mutex] ne ""} { + if {[regexp (firefox) $user_agent] && [info command ::thread::mutex] ne ""} { set mode streaming } my log "--mode $mode, user_agent=$user_agent" Index: openacs-4/packages/xowiki/www/ajax/streaming-chat.js =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/ajax/Attic/streaming-chat.js,v diff -u -r1.1 -r1.2 --- openacs-4/packages/xowiki/www/ajax/streaming-chat.js 8 Apr 2006 00:11:55 -0000 1.1 +++ openacs-4/packages/xowiki/www/ajax/streaming-chat.js 8 Apr 2006 15:00:45 -0000 1.2 @@ -23,7 +23,9 @@ } function getData() { - var response = http.responseText.substring(http.last); + //alert('access responseText'); // hmm, IE does not allow us to access responstext in state == 3 :( + var response = http.responseText.substring(http_last); + //alert('access responseText done'); // we recognize a complete message by a trailing }\n if (response.match(/\}[\n ]+$/)) { var messages = document.getElementById('messages'); @@ -49,11 +51,12 @@ messages.appendChild(p); messages.scrollTop = messages.scrollHeight; } - http.last = http.responseText.length; + http_last = http.responseText.length; } } - + var http = getHttpObject(); +var http_last = 0; var http_send = getHttpObject(); function chatSendMsg() { @@ -90,7 +93,7 @@ } }; http.send(null); - http.last = 0; + http_last = 0; } function tell(msg) { document.monitor.window.value = msg;