Index: openacs.org-dev/packages/acs-subsite/www/shared/whos-online.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-subsite/www/shared/whos-online.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/acs-subsite/www/shared/whos-online.tcl	9 Jul 2002 17:34:59 -0000	1.1.1.1
+++ openacs.org-dev/packages/acs-subsite/www/shared/whos-online.tcl	8 Oct 2002 15:46:49 -0000	1.1.1.2
@@ -3,7 +3,8 @@
 
     @cvs-id $Id$
 } -properties {
-    decorate_top:onevalue
+    title:onevalue
+    context:onevalue
     last_visit_interval:onevalue
     chat_system_name:onevalue
     connected_user_id:onevalue
@@ -19,7 +20,9 @@
 
 db_release_unused_handles
 
-set decorate_top [ad_decorate_top "<h2>Who's Online?</h2>\n[ad_context_bar_ws_or_index "Who's Online"]" [ad_parameter WhosOnlineDecoration]]
+set title "Who's Online?"
+set context [list "Who's Online"]
+
 set last_visit_interval [ad_parameter LastVisitUpdateInterval ""]
 
 #if ![ad_parameter EnabledP chat 0] {