X-Git-Url: http://git.cyclocoop.org/?a=blobdiff_plain;f=www%2Fecrire%2Fbalise%2Finfo_.php;fp=www%2Fecrire%2Fbalise%2Finfo_.php;h=6c0c91ecf382c445ec662570cc98047ac0731922;hb=a33c2ba9d919664b3bb0f565f8e9a8b9d8530cdb;hp=0000000000000000000000000000000000000000;hpb=8945248b3d948385798d9aa355c70e7089aca2b3;p=lhc%2Fweb%2Fclavette_www.git

diff --git a/www/ecrire/balise/info_.php b/www/ecrire/balise/info_.php
new file mode 100644
index 0000000..6c0c91e
--- /dev/null
+++ b/www/ecrire/balise/info_.php
@@ -0,0 +1,40 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2014                                                *
+ *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
+ *                                                                         *
+ *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
+ *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+/**
+ * Generer n'importe quel info pour un objet : #INFO_TITRE{article, #ENV{id_article}}
+ * Utilise la fonction generer_info_entite() de inc/filtres
+ * se reporter a sa documentation
+ * 
+ */
+function balise_INFO__dist($p){
+	$info = $p->nom_champ;
+	$type_objet = interprete_argument_balise(1,$p);
+	$id_objet = interprete_argument_balise(2,$p);
+	if ($info === 'INFO_' or !$type_objet or !$id_objet) {
+		$msg = _T('zbug_balise_sans_argument', array('balise' => ' INFO_'));
+		erreur_squelette($msg, $p);
+		$p->interdire_scripts = true;
+		return $p;
+	}
+	else {
+		$info_sql = strtolower(substr($info,5));
+		$code = "generer_info_entite($id_objet, $type_objet, '$info_sql'".($p->etoile?","._q($p->etoile):"").")";
+		$p->code = champ_sql($info, $p, $code);
+		$p->interdire_scripts = true;
+		return $p;
+	}
+}
+
+?>