Index: openacs-4/packages/logger/tcl/project-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/logger/tcl/project-procs.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/logger/tcl/project-procs.xql	6 Apr 2003 09:26:47 -0000	1.3
+++ openacs-4/packages/logger/tcl/project-procs.xql	22 Apr 2003 09:25:40 -0000	1.4
@@ -30,6 +30,15 @@
     </querytext>
   </fullquery>
 
+  <fullquery name="logger::project::get_primary_variable.select_primary_variable">
+    <querytext>
+        select variable_id
+        from logger_project_var_map
+        where project_id = :project_id
+        and primary_p = 't'
+    </querytext>
+  </fullquery>
+    
   <fullquery name="logger::project::get_variables.select_variables">
     <querytext>
       select variable_id
@@ -38,4 +47,15 @@
     </querytext>
   </fullquery>
 
+  <fullquery name="logger::project::edit.update_project">
+    <querytext>
+        update logger_projects
+                set name = :name,
+                    description = :description, 
+                    project_lead = :project_lead,
+                    active_p = :active_p
+        where project_id = :project_id
+    </querytext>
+  </fullquery>
+
 </queryset>