/* AUTORISATIONS */
function grainepc_objet_est_carto($objet, $id) {
	$compo = compositions_determiner($objet, $id);
	return ($compo == 'carte');
}

// autorisations des champs extras de carte ...
foreach (array(
	'declinaison',
	'structure',
	'affichage',
	'date_creation',
	'coordonnees',
	'presentation',
	'infos') as $nom)
{
	$m = "autoriser_article_modifierextra_" . $nom . "_dist";
	$v = "autoriser_article_voirextra_" . $nom . "_dist";

	$code = "
		if (!function_exists('$m')) {
			function $m(\$faire, \$type, \$id, \$qui, \$opt) {
				return grainepc_objet_est_carto(\$type, \$id);
			}
		}
		if (!function_exists('$v')) {
			function $v(\$faire, \$type, \$id, \$qui, \$opt) {
				return grainepc_objet_est_carto(\$type, \$id);
			}
		}
	";

	# var_dump($code);
	eval($code);
}