[Phpgroupware-cvs] projects/inc/class.soprojects.inc.php, 1.96

[nomail]

Update of /projects/inc
Modified Files:
        Branch: 
          class.soprojects.inc.php

date: 2004/04/22 13:32:24;  author: ceb;  state: Exp;  lines: +20 -1

Log Message:
update
=====================================================================
No syntax errors detected in -
=====================================================================
Index: projects/inc/class.soprojects.inc.php
diff -u projects/inc/class.soprojects.inc.php:1.95 
projects/inc/class.soprojects.inc.php:1.96
--- projects/inc/class.soprojects.inc.php:1.95  Tue Mar 16 17:06:21 2004
+++ projects/inc/class.soprojects.inc.php       Thu Apr 22 13:32:24 2004
@@ -841,7 +841,26 @@
                        if ($subs)
                        {
                                $subdelete = ' OR main =' . $project_id;
+                               $subpro = $this->read_projects(array('column' 
=> 'project_id,level','limit' => False,'action' => 'subs','parent' => 
$project_id));
+
+                               if(is_array($subpro))
+                               {
+                                       $i = 0;
+                                       foreach($subpro as $sub)
+                                       {
+                                               $s[$i] = $sub['project_id'];
+                                               ++$i;
+                                       }
+                               }
+
+                               if(is_array($s))
+                               {
+                                       $sub_acl_delete = ' OR acl_location 
in(' . implode(',',$s) . ')';
+                               }
                        }
+
+                       $this->db->query("DELETE from phpgw_acl where 
acl_appname='projects' and acl_rights=7 and (acl_location=" . $project_id . 
$sub_acl_delete
+                                                       . 
')',__LINE__,__FILE__);
 
                        $this->db->query('DELETE from phpgw_p_projects where 
project_id=' . $project_id . $subdelete,__LINE__,__FILE__);