Index: openacs-4/packages/logger/www/admin/project-make-inactive.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/project-make-inactive.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/logger/www/admin/project-make-inactive.tcl	28 Aug 2003 09:45:31 -0000	1.2
+++ openacs-4/packages/logger/www/admin/project-make-inactive.tcl	13 Jan 2005 13:58:23 -0000	1.3
@@ -9,6 +9,18 @@
         logger::project::set_active_p \
             -project_id $id \
             -active_p f
+
+        if {[logger::util::project_manager_linked_p]} {
+            db_dml set_status "
+                UPDATE 
+                pm_projects
+                SET 
+                status_id = [pm::status::default_closed] 
+                WHERE
+                project_id = (select live_revision from cr_items where item_id = [pm::project::get_project -logger_project $id])
+            "
+
+        }
     }
 }