Changeset 17879

Show
Ignore:
Timestamp:
10/02/08 16:11:26 (2 months ago)
Author:
bergie
Message:

Migrate to MgdSchema? API

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/midcom/midcom.helper.datamanager/helpers_select_lists.php

    r14773 r17879  
    3636 */ 
    3737 /* helper for the recursive part of midcom_helper_datamanager_selectlist_allgroups */ 
    38 function midcom_helper_datamanager__selectlist_allgroups_recursor($up, $spacer, &$data, $sitegroup) { 
    39     if (is_null ($up)) 
     38function midcom_helper_datamanager__selectlist_allgroups_recursor($up, $spacer, &$data, $sitegroup)  
     39
     40    $qb = midcom_db_group::new_query_builder(); 
     41    if (!is_null($up)) 
    4042    { 
    41         $groups = mgd_list_groups(); 
     43        $qb->add_constraint('owner', '=', (int) $up); 
    4244    } 
    43     else 
    44     { 
    45         $groups = mgd_list_groups($up); 
    46     } 
     45    $groups = $qb->execute(); 
    4746    if ($groups) 
    4847    { 
    49         while ($groups->fetch()
     48        foreach ($groups as $group
    5049        { 
    51             if ($groups->sitegroup != $sitegroup) 
     50            if ($group->sitegroup != $sitegroup) 
    5251            { 
    5352                continue; 
     
    5554 
    5655            // Don't show groups deeper in hierarchy as toplevel 
    57             $group = mgd_get_group($groups->id); 
    58             if (is_null($up) && $group->owner != 0) 
     56            if (   is_null($up)  
     57                && $group->owner != 0) 
    5958            { 
    6059                continue; 
     
    6968                $name = "ID {$group->id}"; 
    7069            } 
    71             $data[$group->guid()] = $spacer . $group->name; 
     70            $data[$group->guid] = $spacer . $group->name; 
    7271            midcom_helper_datamanager__selectlist_allgroups_recursor($groups->id, 
    7372                                                                     $spacer . "    ",