[SPIP] +version 3.0.7
[ptitvelo/web/www.git] / www / plugins-dist / sites / formulaires / editer_site_fonctions.php
diff --git a/www/plugins-dist/sites/formulaires/editer_site_fonctions.php b/www/plugins-dist/sites/formulaires/editer_site_fonctions.php
new file mode 100644 (file)
index 0000000..86f1c3c
--- /dev/null
@@ -0,0 +1,33 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2013                                                *
+ *  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;
+
+function saisie_url_syndic($url_syndic,$name='url_syndic',$id='url_syndic'){
+       $res = "";
+       if (strlen($url_syndic) < 8) $url_syndic = "http://";
+
+       // cas d'une liste de flux detectee par feedfinder : menu
+       if (preg_match(',^select: (.+),', $url_syndic, $regs)) {
+               $feeds = explode(' ',$regs[1]);
+               $res .= "<select name='$name' id='$id'>\n";
+               foreach ($feeds as $feed) {
+                       $res .= '<option value="'.entites_html($feed).'">'.$feed."</option>\n";
+               }
+               $res .= "</select>\n";
+       } else {
+               $res .= "<input type='text' class='text' name='$name' id='$id' value=\"$url_syndic\" size='40' />\n";
+       }
+       return $res;
+}
+
+?>