Index: openacs-4/packages/imsld/www/activity-frame.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/activity-frame.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/imsld/www/activity-frame.adp 23 Mar 2006 16:24:44 -0000 1.2
+++ openacs-4/packages/imsld/www/activity-frame.adp 31 Mar 2006 14:36:50 -0000 1.3
@@ -2,8 +2,113 @@
+
+
+
-@activities_list;noquote@
+
+@activities;noquote@
+
+
+
+
+hola
+
+
Index: openacs-4/packages/imsld/www/activity-frame.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/activity-frame.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/imsld/www/activity-frame.tcl 30 Mar 2006 17:30:31 -0000 1.2
+++ openacs-4/packages/imsld/www/activity-frame.tcl 31 Mar 2006 14:36:50 -0000 1.3
@@ -12,11 +12,12 @@
dom createDocument ul doc
set dom_root [$doc documentElement]
+$dom_root setAttribute class "nav"
set activity_item_id [content::revision::item_id -revision_id $activity_id]
imsld::process_activity_as_ul -activity_item_id $activity_item_id -dom_doc $doc -dom_node $dom_root
-set activities_list [$dom_root asXML]
+set activities [$dom_root asXML]
set page_title {}
set context [list]
Index: openacs-4/packages/imsld/www/environment-frame.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/environment-frame.adp,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/imsld/www/environment-frame.adp 31 Mar 2006 14:36:50 -0000 1.1
@@ -0,0 +1,12 @@
+
+
+
+
+
+
+
+@environments;noquote@
+
+
+
+
Index: openacs-4/packages/imsld/www/environment-frame.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/environment-frame.tcl,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/imsld/www/environment-frame.tcl 31 Mar 2006 14:36:50 -0000 1.1
@@ -0,0 +1,34 @@
+ad_page_contract {
+
+ This is the frame that contains the associated URLs of an environment
+
+ @author Eduardo P�rez Ureta
+ @creation-date 2006-03-03
+} -query {
+ activity_id:integer,notnull
+}
+
+set user_id [ad_conn user_id]
+
+dom createDocument ul doc
+set dom_root [$doc documentElement]
+
+set environments_node_ul [$doc createElement ul]
+set environments_node_li [$doc createElement li]
+set text [$doc createTextNode "Environments"]
+$environments_node_li appendChild $text
+set environments_node [$doc createElement ul]
+# FIX-ME: if the ul is empty, the browser shows the ul incorrectly
+
+set activity_item_id [content::revision::item_id -revision_id $activity_id]
+
+imsld::process_activity_environments_as_ul -activity_item_id $activity_item_id \
+ -dom_node $environments_node \
+ -dom_doc $doc
+
+$environments_node_ul appendChild $environments_node_li
+$environments_node_ul appendChild $environments_node
+set environments [$environments_node_ul asXML]
+
+set page_title {}
+set context [list]
Index: openacs-4/packages/imsld/www/imsld-frameset.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/Attic/imsld-frameset.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/imsld/www/imsld-frameset.adp 22 Mar 2006 15:26:37 -0000 1.2
+++ openacs-4/packages/imsld/www/imsld-frameset.adp 31 Mar 2006 14:36:50 -0000 1.3
@@ -10,6 +10,6 @@
-
+