function filltheselector($next)
{
 global $db, $settings, $language, $mapids, $categorypref, $scriptname;
 if ($scriptname == 'wsnforum') 
 {
	$ctypes = explode(',', $settings->cattypes);
	$ltypes = explode(',', $language->categorytypes);
	$n = sizeof($ctypes);
	for ($x=0; $x<$n; $x++)
	{
	 $categoryselect .= '<optgroup label="'. $ltypes[$x] .'">';
	 $categoryselect .= fillcattype($ctypes[$x], 0); 
	 $categoryselect .= '</optgroup>'; 
	}
 }
 else
 {
  $order = $settings->ordercats;
  if ($settings->ordercatselector != '') $order = $settings->ordercatselector; 
  if ($settings->ordercats2 != '') $order .= str_replace('ORDER BY ', ',', $settings->ordercats2);
  $query = $db->select('id,name,parentids,parentnames,numsub', 'categoriestable', "parent=$next AND validated=1 AND hide=0 AND deleted=0 AND isalbum=0", $order, '');
  $num = $db->numrows($query);
  for ($count=0; $count<$num; $count++)
  { 
   $row = $db->row($query);
   $id = $row[0];
   $name = $row[1];
   $parentids = $row[2];
   $parentnames = $row[3];
   $numsub = $row[4];   
   $rewritepath = '';
   if ($parentnames != '' && strstr($settings->optionscontent, 'REWRITEPATH}'))
   {
    $group = explode(', ', $parentnames);
    $n = sizeof($group);
    for ($x=$n; $x>0; $x--)
    {
     if ($group[$x] != '')
     {
      $rewritepath .= urlencode(str_replace(' ', $settings->rewritecategoryspace, $group[$x])) .'/';
     }
    }
   }
   $rewritepath .= urlencode(str_replace(' ', $settings->rewritecategoryspace, $name));
   $parentarray = explode(', ', trim($parentids, ', '));
   if ($parentarray[0] > 0) $level = sizeof($parentarray) + 1;
   else $level = 1;
   $indent = '';
   if ($settings->selectorlevels >= $level)
   { 
    for ($dum=1; $dum<$level; $dum++)
      $indent .= $language->catselector_indent; 
    $thisoption = str_replace($categorypref .'ID}', $id, $settings->optionscontent);
    $thisoption = str_replace($categorypref .'NAME}', $name, $thisoption);
    $thisoption = str_replace($categorypref .'INDENT}', $indent, $thisoption);
    $thisoption = str_replace($categorypref .'REWRITEPATH}', $rewritepath, $thisoption);
    $categoryselect .= $thisoption;
    $mapids .= ','. $id;
    // now we work on the children...
    if (($settings->selectorlevels > 1 || $settings->maplevels > 1) && $numsub) $categoryselect .= filltheselector($id);
   }
   else if ($settings->maplevels >= $level)
   {
    $mapids .= ','. $id;
    if (($settings->maplevels > 1 || $settings->selectorlevels > 1) && $numsub) $mapids .= filltheselector($id);
   }
  }
 } 
 return $categoryselect;
}