--- /dev/null
+<?php
+
+/***************************************************************************\
+ * SPIP, Systeme de publication pour l'internet *
+ * *
+ * Copyright (c) 2001-2011 *
+ * 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;
+}
+
+?>