www/ecrire/typographie/en.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2017                                                *
   7  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8  *                                                                         *
   9  *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
  10  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
  11 \***************************************************************************/
  12
  13 if (!defined('_ECRIRE_INC_VERSION')) {
  14         return;
  15 }
  16
  17 // rien sauf les "~" et "-,"
  18
  19 function typographie_en_dist($letexte) {
  20
  21         // zouli apostrophe
  22         $letexte = str_replace("'", '&#8217;', $letexte);
  23
  24         $cherche1 = array(
  25                 '/ --?,/S'
  26         );
  27         $remplace1 = array(
  28                 '~\0'
  29         );
  30         $letexte = preg_replace($cherche1, $remplace1, $letexte);
  31
  32         $letexte = str_replace('&nbsp;', '~', $letexte);
  33         $letexte = preg_replace('/ *~+ */', '~', $letexte);
  34
  35         $cherche2 = array(
  36                 '/([^-\n]|^)--([^-]|$)/',
  37                 '/~/'
  38         );
  39         $remplace2 = array(
  40                 '\1&mdash;\2',
  41                 '&nbsp;'
  42         );
  43
  44         $letexte = preg_replace($cherche2, $remplace2, $letexte);
  45
  46         return $letexte;
  47 }