[SPIP] +2.1.12
[velocampus/web/www.git] / www / ecrire / inc / lien_court.php
diff --git a/www/ecrire/inc/lien_court.php b/www/ecrire/inc/lien_court.php
new file mode 100644 (file)
index 0000000..b15f1b7
--- /dev/null
@@ -0,0 +1,33 @@
+<?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;
+
+/*
+ * Cette fonction prend une URL et la raccourcit si elle est trop longue
+ * de cette maniere au lieu d'afficher
+ * "http://zoumzamzouilam/truc/chose/machin/qui/fait/peur/a/tout/le/monde.mp3"
+ * on affiche
+ * http://zoumzamzouilam/truc/chose/machin..."
+ */
+function inc_lien_court($url) {
+       $long_url = defined('_MAX_LONG_URL') ? _MAX_LONG_URL : 40;
+       $coupe_url = defined('_MAX_COUPE_URL') ? _MAX_COUPE_URL : 35;
+
+       if (strlen($url)>$long_url) {
+               $url = substr($url,0,$coupe_url).'...';
+       }
+
+       return $url;
+}
+
+?>
\ No newline at end of file