Changeset 109000 in spip-zone


Ignore:
Timestamp:
Feb 18, 2018, 10:35:42 PM (3 years ago)
Author:
patfr@…
Message:

Quelques create_function() en moins

Location:
_plugins_/couteau_suisse
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • _plugins_/couteau_suisse/cout_utils.php

    r107348 r109000  
    271271        return '';
    272272}
    273        
     273
     274function cs_aide_raccourcis_callback($matches) {
     275        return defined($matches[1])?constant($matches[1]):"";
     276}
     277
    274278// retourne la liste des raccourcis disponibles
    275279function cs_aide_raccourcis() {
     
    280284        if(!count($aide)) return '';
    281285        // remplacement des constantes de forme @_CS_XXXX@
    282         $aide = preg_replace_callback(',@(_CS_[a-zA-Z0-9_]+)@,',
    283                 create_function('$matches','return defined($matches[1])?constant($matches[1]):"";'), join("\n", $aide));
     286        $aide = preg_replace_callback(',@(_CS_[a-zA-Z0-9_]+)@,', 'cs_aide_raccourcis_callback', join("\n", $aide));
    284287        return '<p><b>' . couteauprive_T('raccourcis') . '</b></p><ul class="cs_raccourcis">' . $aide . '</ul>';
    285288}
     
    356359}
    357360
     361function cs_nom_outil_callback($m) {
     362        return _T($m[1]);
     363}
     364
    358365function cs_nom_outil(&$outil, $traduit=true) {
    359366        if($outil['pas_de_nom']) {
     
    366373        // si on trouve une chaine de langue dans le nom traduit, le resultat sera forcement traduit
    367374        if(strpos($nom_traduit, '<:')!==false)
    368                 return preg_replace_callback(',<:([:a-z0-9_-]+):>,i', create_function('$m','return _T($m[1]);'), $nom_traduit);
     375                return preg_replace_callback(',<:([:a-z0-9_-]+):>,i', 'cs_nom_outil_callback', $nom_traduit);
    369376        return (!$traduit && strlen($nom))?$nom:$nom_traduit;
    370377}
  • _plugins_/couteau_suisse/inc/description_outil.php

    r107349 r109000  
    149149}
    150150
     151function description_outil_callback1($m) {
     152        return couteauprive_T($m[1].":description".$m[2]);
     153}
     154function description_outil_callback2($m) {
     155        return _T($m[1]);
     156}
     157function description_outil_callback3($m) {
     158        return defined($m[1])?constant($m[1]):(' ('.couteauprive_T('outil_inactif').')');
     159}
     160
    151161// renvoie la description de $outil_ : toutes les %variables% ont ete remplacees par le code adequat
    152162function inc_description_outil_dist($outil_, $url_self, $modif=false) {
     
    180190                        // lames natives : reconstitution d'une description eventuellement morcelee
    181191                        // exemple : <:mon_outil:3:> est remplace par couteauprive_T('mon_outil:description3')
    182                         $descrip = preg_replace_callback(',<:([a-z_][a-z0-9_-]*):([0-9]*):>,i',
    183                                 create_function('$m','return couteauprive_T($m[1].":description".$m[2]);'), $descrip);
     192                        $descrip = preg_replace_callback(',<:([a-z_][a-z0-9_-]*):([0-9]*):>,i', 'description_outil_callback1', $descrip);
    184193                // chaines de langue personnalisees
    185                 $descrip = preg_replace_callback(',<:([:a-z0-9_-]+):>,i', create_function('$m','return _T($m[1]);'), $descrip);
     194                $descrip = preg_replace_callback(',<:([:a-z0-9_-]+):>,i', 'description_outil_callback2', $descrip);
    186195        }
    187196        // envoi de la description en pipeline
     
    269278        // remplacement des constantes qui restent de forme @_CS_XXXX@
    270279        if(strpos($res, '@_CS')!==false)
    271                 $res = preg_replace_callback(',@(_CS_[a-zA-Z0-9_]+)@,',
    272                         create_function('$matches','return defined($matches[1])?constant($matches[1]):(\' (\'.couteauprive_T(\'outil_inactif\').\')\');'), $res);
     280                $res = preg_replace_callback(',@(_CS_[a-zA-Z0-9_]+)@,', 'description_outil_callback3', $res);
    273281        // remplacement des liens vers un autre outil
    274282        $res = description_outil_liens($res);
  • _plugins_/couteau_suisse/outils/maj_auto_action_rapide.php

    r106393 r109000  
    130130}
    131131
     132function maj_auto_action_rapide_callback($v) {
     133        return _T('couteau:2pts', array('objet'=>$v));
     134}
    132135
    133136function maj_auto_action_rapide($actif) {
    134137        if(!$actif) return str_replace(':','',_T('couteau:maj_liste'));
    135138        $arg_chargeur = $GLOBALS['spip_version_base']>=15828?'url_zip_plugin2':'url_zip_plugin'; // eq. SPIP >= 2.1.2
    136         $tiers = array_map(create_function('$v','return _T("couteau:2pts", array("objet"=>$v));'), explode('/', _T('couteau:maj_tiers')));
     139        $tiers = array_map('maj_auto_action_rapide_callback', explode('/', _T('couteau:maj_tiers')));
    137140        $tiers = array('necessite'=> $tiers[0], 'utilise'=> $tiers[1], 'procure'=> $tiers[2]);
    138141        $time = time();
  • _plugins_/couteau_suisse/paquet.xml

    r108999 r109000  
    22        prefix="couteau_suisse"
    33        categorie="maintenance"
    4         version="1.10.06"
     4        version="1.10.07"
    55        etat="stable"
    66        compatibilite="[1.9.2;3.2.*]"
  • _plugins_/couteau_suisse/plugin.xml

    r108999 r109000  
    33        <slogan>... ou plus de fonctionnalit&#233;s pour SPIP !</slogan>
    44        <icon>img/couteau-50.gif</icon>
    5         <version>1.10.06</version>
     5        <version>1.10.07</version>
    66        <version_base>1.11</version_base>
    77        <auteur>Patrice Vanneufville
Note: See TracChangeset for help on using the changeset viewer.