Index: openacs-4/contrib/packages/project-manager/www/index-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/index-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/project-manager/www/index-postgresql.xql	15 Jun 2003 13:07:28 -0000	1.1
+++ openacs-4/contrib/packages/project-manager/www/index-postgresql.xql	30 Jul 2003 21:25:07 -0000	1.2
@@ -5,20 +5,18 @@
 <fullquery name="project_folders">
     <querytext>
         SELECT
-	i.item_id,
-	repeat(:indent_pattern, (tree_level(i.tree_sortkey) - 2)* :indent_factor) as indent,
-        t.folder_id,
-	t.content_type,
+	p.item_id,
+        p.project_id,
+ 	repeat(:indent_pattern, (tree_level(p.tree_sortkey) - 5)* :indent_factor) as indent,
+        p.parent_id as folder_id,
+	p.object_type as content_type,
 	p.project_name,
-	p.project_folder_id,
 	p.project_code,
 	to_char(p.planned_start_date, 'YYYY MM DD') as planned_start_date,
 	to_char(p.planned_end_date, 'YYYY MM DD') as planned_end_date,
 	p.ongoing_p
-        FROM cr_items i, cr_folder_type_map t, pm_projectsx p
-	WHERE t.content_type = 'pm_project' AND
-	i.item_id = t.folder_id AND
-	p.project_folder_id = t.folder_id
+        FROM pm_projectsx p, cr_items i
+        WHERE p.project_id = i.live_revision
         ORDER BY i.tree_sortkey
     </querytext>
 </fullquery>
Index: openacs-4/contrib/packages/project-manager/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/index.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/packages/project-manager/www/index.adp	15 Jun 2003 13:07:28 -0000	1.2
+++ openacs-4/contrib/packages/project-manager/www/index.adp	30 Jul 2003 21:25:07 -0000	1.3
@@ -1,7 +1,11 @@
 <master>
+<link rel="stylesheet" href="style.css" type="text/css">
+
 <property name="title">@title@</property>
 <property name="context">@context@</property>
 
+My projects | All projects | My tasks | All tasks | Processes
+
 <table border=1 cellpadding=0 cellspacing=0 width=100%>
   <tr>
     <th>Project</th>
@@ -19,7 +23,7 @@
   </else>
       <td>
         @projects.indent@
-        <a href=view-project?project_folder_id=@projects.item_id@>
+        <a href=one?item_id=@projects.item_id@&project_id=@projects.project_id@>
           @projects.project_name@
         </a>
       </td>
Index: openacs-4/contrib/packages/project-manager/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/index.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/packages/project-manager/www/index.tcl	15 Jun 2003 13:07:28 -0000	1.2
+++ openacs-4/contrib/packages/project-manager/www/index.tcl	30 Jul 2003 21:25:07 -0000	1.3
@@ -14,16 +14,21 @@
     title:onevalue
     context:onevalue
     projects:multirow
-
 }
 
 # --------------------------------------------------------------- #
 
-set title "Project Repository"
+set title "Projects"
 set context [list]
 set indent_pattern "&nbsp;"
 set indent_factor [parameter::get -parameter IndentationFactor -default 5]
 
+set package_id [ad_conn package_id]
+
+set false f
+
+set root_folder [db_string get_root "select pm_project__get_root_folder (:package_id, :false)"]
+
 db_multirow projects project_folders {}
 
 ad_return_template