Changeset 47574 in spip-zone


Ignore:
Timestamp:
May 8, 2011, 10:36:29 PM (9 years ago)
Author:
patfr@…
Message:
  • La fonction d'installation d'un outil est désormais surchargeable : "monoutil_installe()" surcharge "monoutil_installe_dist()"

Exemples :

function typo_exposants_installe() {

$datas = typo_exposants_installe_dist();
$datasfr?[0][] = '/exemple/';
$datasfr?[1][] = 'ex<sup>emple</sup>';
return $datas;

}
function spam_installe() {

$datas = spam_installe_dist();
$datas[0][] = 'verybadword';
return $datas;

}

Rappel:

Le résultat compilé de toutes les données d'installation est visible dans le fichier : tmp/couteau-suisse/mes_outils.php

  • Le tableau renvoyé par la function monoutil_installe() n'a plus besoin de clé si le casier utilisé est unique.
Location:
_plugins_/couteau_suisse
Files:
13 edited

Legend:

Unmodified
Added
Removed
  • _plugins_/couteau_suisse/cout_lancement.php

    r47504 r47574  
    247247        // installation de l'outil
    248248        include_spip('outils/'.$outil);
    249         if(function_exists($f=$outil.'_installe')
     249        if( (function_exists($f = $outil.'_installe') || function_exists($f = $f.'_dist'))
    250250                && ($tmp=$f())
    251251                && (isset($tmp[$ok=$casier]) || (!$casier_ && (isset($tmp[$ok=0]) || isset($tmp[$ok=$outil])))))
  • _plugins_/couteau_suisse/cout_utils.php

    r47479 r47574  
    689689        foreach($metas_outils as $nom=>$o) if(isset($o['actif']) && $o['actif']) {
    690690                include_spip('outils/'.$nom);
    691                 if(function_exists($f = $nom.'_installe')) {
    692                         if(($tmp=$f())!==NULL) foreach($tmp as $i=>$v) {
     691                if(function_exists($f = $nom.'_installe') || function_exists($f = $f.'_dist')) {
     692                        if(is_array($tmp=$f())) foreach($tmp as $i=>$v) {
    693693                                $j=($i && $i!==$nom)?$nom.'_'.$i:$nom;
    694                                 $datas[$j] = "function cs_data_$j() { return " . var_export($v, true) . ";\n}";
     694                                $datas[$j] = "function cs_data_$j() { return " . var_export($v, true) . ';}';
    695695                        }
    696696if(defined('_LOG_CS')) cs_log(" -- $f() : OK !");
  • _plugins_/couteau_suisse/exec/test_couteau_suisse.php

    r28839 r47574  
    218218define('_COULEURS_FONDS', 1); define('_COULEURS_SET', 1);
    219219define('_COULEURS_PERSO', "bas =#99CC11, haut= brown, test= bleu");
    220 couleurs_installe();
     220couleurs_installe_dist();
    221221print_r(couleurs_pre_typo("to[bas]to[/bas]to[haut]to[/haut]toto[test]to[/couleur]to\nto[bg bas]to[/bg]to[bg haut]to[/bg]toto[bg test]to[/bg test]to\n"));
    222222print_r(couleurs_pre_typo("to[red]to[/red]to[bleu]to[/bleu]toto[rouge]to[/couleur]to\nto[bg red]to[/bg]to[bg bleu]to[/bg]toto[bg rouge]to[/bg rouge]to\n"));
  • _plugins_/couteau_suisse/outils/chatons.php

    r39078 r47574  
    1717}
    1818
    19 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    20 function chatons_installe() {
     19// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     20function chatons_installe_dist() {
    2121        $chatons = array();
    2222        $path = find_in_path('img/chatons');
     
    3131                }
    3232        }
    33         return array('chatons' => $chatons);
     33        return array($chatons);
    3434}
    3535
  • _plugins_/couteau_suisse/outils/couleurs.php

    r47479 r47574  
    2828}
    2929
    30 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    31 function couleurs_installe() {
    32 cs_log("couleurs_installe()");
     30// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     31function couleurs_installe_dist() {
     32cs_log("couleurs_installe_dist()");
    3333
    3434        list($couleurs, $html) = couleurs_constantes();
  • _plugins_/couteau_suisse/outils/decoration.php

    r47479 r47574  
    77*/
    88
    9 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    10 function decoration_installe() {
     9// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     10function decoration_installe_dist() {
    1111        if(!defined('_decoration_BALISES')) return NULL;
    12 cs_log("decoration_installe()");
     12cs_log("decoration_installe_dist()");
    1313        // on decode les balises entrees dans la config
    1414        $deco_balises = preg_split("/[\r\n]+/", trim(_decoration_BALISES));
  • _plugins_/couteau_suisse/outils/filets_sep.php

    r46258 r47574  
    1919@define('_FILETS_REG_EXT', '\.(?:png|gif|jpg)');
    2020
    21 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    22 function filets_sep_installe() {
    23 //cs_log('filets_sep_installe()');
     21// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     22function filets_sep_installe_dist() {
     23//cs_log('filets_sep_installe_dist()');
    2424        include_spip('inc/texte');
    2525        // Tester si on echappe en span ou en div
     
    5252        if($bt) for($i=0; $i<=_FILETS_SEP_MAX_CSS; $i++)
    5353                $filets[5]['filet_'.$i] = $i;
    54         return array('filets_sep' => $filets);
     54        return array($filets);
    5555}
    5656
  • _plugins_/couteau_suisse/outils/insertions.php

    r43637 r47574  
    55*/
    66
    7 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    8 function insertions_installe() {
     7// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     8function insertions_installe_dist() {
    99        if(!defined('_insertions_LISTE')) return NULL;
    10 cs_log("insertions_installe()");
     10cs_log("insertions_installe_dist()");
    1111        // on decode la liste entree dans la config
    1212        $liste = preg_split("/[\r\n]+/", trim(_insertions_LISTE));
     
    2828                }
    2929        }
    30         return array('insertions' => array($str, $preg));
     30        return array(array($str, $preg));
    3131}
    3232
  • _plugins_/couteau_suisse/outils/jcorner.php

    r43637 r47574  
    11<?php
    2 function jcorner_installe() {
    3 cs_log("jcorner_installe()");
     2
     3// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     4function jcorner_installe_dist() {
     5cs_log("jcorner_installe_dist()");
    46        if(!defined('_jcorner_CLASSES')) return NULL;
    57
     
    2224        }
    2325        // en retour : le code jQuery
    24         return array('jcorner' => join("\n\t", $code));
     26        return array(join("\n\t", $code));
    2527}
    2628
  • _plugins_/couteau_suisse/outils/smileys.php

    r47479 r47574  
    66// dessin des frimousses : Sylvain Michel [http://www.guaph.net/]
    77
    8 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    9 function smileys_installe() {
     8// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     9function smileys_installe_dist() {
    1010        $path = find_in_path('img/smileys');
    11 cs_log("smileys_installe() : $path");
     11cs_log("smileys_installe_dist() : $path");
    1212        $path2 = url_absolue($path);
    1313
  • _plugins_/couteau_suisse/outils/spam.php

    r39078 r47574  
    55//      2. si le mot existe dans un des textes d'un formulaire, on avertit !
    66
    7 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    8 function spam_installe() {
     7// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     8function spam_installe_dist() {
    99        // tableau des mots interdits
    1010        $t = array(
     
    2828        array_walk($spam_mots, 'spam_walk');
    2929        $t[3] = count($spam_mots)?'/^(?:' . join('|', $spam_mots) . ')$/':'';
    30         return array('spam' => $t);
     30        return array($t);
    3131}
    3232
  • _plugins_/couteau_suisse/outils/typo_exposants.php

    r47503 r47574  
    1111@define('_TYPO_sup2', '\\1<sup class="typo_exposants">\\2</sup>');
    1212
    13 // cette fonction est appelee automatiquement a chaque affichage de la page privee du Couteau Suisse
    14 function typo_exposants_installe() {
     13// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
     14function typo_exposants_installe_dist() {
    1515        // en principe, pas besoin de : caractere_utf_8(232)
    1616        $carre = unicode2charset('&#178;').'|&#178;|&sup2;';
  • _plugins_/couteau_suisse/plugin.xml

    r47526 r47574  
    22        <nom><multi>[en]Swiss Knife[fr]Le Couteau Suisse[ca]El Ganivet Su&#237;s[ar]&#1587;&#1603;&#1610;&#1606; &#1575;&#1604;&#1580;&#1610;&#1576;[nl]Het Zwitserland Mes[gl]A navalla su&#237;za[es]La Navaja Suiza[de]Schweizer Taschenmesser[tr]&#304;svi&#231;re &#199;ak&#305;s&#305;[br]Ar Gontell Suis[pt_br]Canivete Su&#237;&#231;o[ast]La Navaya Suiza[gl]A navalla su&#237;za[ro]Cu&#355;itul Elve&#355;ian[it]Coltellino Svizzero</multi></nom>
    33        <icon>img/couteau-50.gif</icon>
    4         <version>1.8.39.01</version>
     4        <version>1.8.40.00</version>
    55        <version_base>1.0</version_base>
    66        <auteur>Patrice Vanneufville
Note: See TracChangeset for help on using the changeset viewer.