spip / SPIP

	foreach (array_reverse(creer_chemin()) as $d) {

		if (is_dir($dir = $d.'lib/')

		AND $t = @opendir($dir)) {

			while (($f = readdir($t)) !== false) {

				if ($f[0] != '.'

				AND is_dir("$dir/$f"))

					$libs[$f] = $dir;

			}

		}

	}

	return $libs;

	$subdirs = array();

	if (@is_dir($dir) AND is_readable($dir) AND $d = @opendir($dir)) {

		while (($f = readdir($d)) !== false) {

			if ($f[0] != '.' # ignorer . .. .svn etc

			AND $f != 'CVS'

			AND is_dir($f = "$dir/$f"))

				$subdirs[] = $f;

		}

		closedir($d);

	}