Index: dotlrn_packages/packages/forums/lib/lams/nextactivity.adp
===================================================================
diff -u
--- dotlrn_packages/packages/forums/lib/lams/nextactivity.adp	(revision 0)
+++ dotlrn_packages/packages/forums/lib/lams/nextactivity.adp	(revision 15caa5255afa6889154045cbe1c100c3af8a09cd)
@@ -0,0 +1,3 @@
+<if @url@ ne "">
+<a href="@url@" class="button" title="#forums.Proceed_to_the_next_LAMS#"> #forums.Next_Activity# </a>
+</if>  
Index: dotlrn_packages/packages/forums/lib/lams/nextactivity.tcl
===================================================================
diff -u
--- dotlrn_packages/packages/forums/lib/lams/nextactivity.tcl	(revision 0)
+++ dotlrn_packages/packages/forums/lib/lams/nextactivity.tcl	(revision 15caa5255afa6889154045cbe1c100c3af8a09cd)
@@ -0,0 +1,28 @@
+ad_page_contract {
+    
+    Create a Forum
+
+    @author Ernie Ghiglione (ErnieG@melcoe.mq.edu.au)
+    @creation-date 2008-07-23
+    @cvs-id $Id$
+
+} -query {
+    {name ""}
+    {toolContentID 0}
+}
+
+set url ""
+ns_log Notice "URL: $url"
+
+# if the session exists...
+if {[nsv_exists A_$forum_id [ad_conn session_id]]} {
+
+    # and the list element 1 (forum_id) is the same as the one passed,
+    # then we know that we need to add the Next Activity button. 
+    if {[string equal $forum_id [lindex [nsv_get A_$forum_id [ad_conn session_id]] 1]]} {
+
+	set url [lindex [nsv_get A_$forum_id [ad_conn session_id]] 0]
+
+    }
+}
+
Index: dotlrn_packages/packages/forums/www/exit.tcl
===================================================================
diff -u
--- dotlrn_packages/packages/forums/www/exit.tcl	(revision 0)
+++ dotlrn_packages/packages/forums/www/exit.tcl	(revision 15caa5255afa6889154045cbe1c100c3af8a09cd)
@@ -0,0 +1,22 @@
+# packages/forums/www/exit.tcl
+
+ad_page_contract {
+    
+    Goes to the next LAMS Activity
+    
+    @author Ernie Ghiglione (ErnieG@mm.st)
+    @creation-date 2008-08-01
+    @arch-tag: 329163D6-BFAB-473F-8253-46873E51FBB4
+    @cvs-id $Id$
+} {
+    returnUrl
+} -properties {
+} -validate {
+} -errors {
+}
+
+if {[nsv_exists lams [ad_conn session_id]]} {
+    nsv_unset lams [ad_conn session_id]
+}
+
+ad_returnredirect $returnUrl
Index: dotlrn_packages/packages/forums/www/forum-view.tcl
===================================================================
diff -u -rdaeeb8cec63bad7412fa122f9db9a7c9350ca7f2 -r15caa5255afa6889154045cbe1c100c3af8a09cd
--- dotlrn_packages/packages/forums/www/forum-view.tcl	(.../forum-view.tcl)	(revision daeeb8cec63bad7412fa122f9db9a7c9350ca7f2)
+++ dotlrn_packages/packages/forums/www/forum-view.tcl	(.../forum-view.tcl)	(revision 15caa5255afa6889154045cbe1c100c3af8a09cd)
@@ -14,8 +14,6 @@
     {returnUrl ""}
 }
 
-ns_log Notice "AAAAAAA $forum_id"
-
 # we create a session to insert the Next Activity button
 # in this session we add the returnUrl as well as the forum_id
 if {![nsv_exists A_$forum_id [ad_conn session_id]] && $returnUrl != ""} {