Index: openacs-4/packages/dotlrn/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/index.tcl,v
diff -u -r1.42 -r1.43
--- openacs-4/packages/dotlrn/www/index.tcl	1 Mar 2005 00:01:27 -0000	1.42
+++ openacs-4/packages/dotlrn/www/index.tcl	4 May 2006 15:09:14 -0000	1.43
@@ -25,6 +25,9 @@
     {page_num 0}
 }
 
+# Used to keep track of navigation links
+ad_set_client_property dotlrn page_num $page_num
+
 if {[parameter::get -parameter community_type_level_p] == 1} {
     ad_returnredirect "one-community-type"
     ad_script_abort
Index: openacs-4/packages/dotlrn/www/one-community-admin.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community-admin.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/dotlrn/www/one-community-admin.tcl	21 Oct 2003 21:53:54 -0000	1.27
+++ openacs-4/packages/dotlrn/www/one-community-admin.tcl	4 May 2006 15:09:14 -0000	1.28
@@ -33,6 +33,9 @@
     users:multirow
 }
 
+# Used to keep track of navigation links
+ ad_set_client_property dotlrn page_num "-1"
+
 set community_id [dotlrn_community::get_community_id]
 set user_id [ad_get_user_id]