Subversion Repositories Applications.papyrus

Rev

Rev 1688 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1688 Rev 1935
Line 27... Line 27...
27
// | de sécurité.                                                                                         |
27
// | de sécurité.                                                                                         |
28
// |                                                                                                      |
28
// |                                                                                                      |
29
// | Le fait que vous puissiez accéder à cet en-tête signifie que vous avez pris connaissance de la       |
29
// | Le fait que vous puissiez accéder à cet en-tête signifie que vous avez pris connaissance de la       |
30
// | licence CeCILL, et que vous en avez accepté les termes.                                              |
30
// | licence CeCILL, et que vous en avez accepté les termes.                                              |
31
// +------------------------------------------------------------------------------------------------------+
31
// +------------------------------------------------------------------------------------------------------+
32
// CVS : $Id: inclure.php,v 1.4 2007-08-28 14:23:55 jp_milcent Exp $
32
// CVS : $Id: inclure.php,v 1.4.2.1 2008-10-22 07:45:46 aperonnet Exp $
33
/**
33
/**
34
* Applette : Inclure
34
* Applette : Inclure
35
*
35
*
36
* Retourne toutes les pages Papyrus appartenant à une catégorie donnée.
36
* Retourne toutes les pages Papyrus appartenant à une catégorie donnée.
37
*
37
*
Line 40... Line 40...
40
//Auteur original :
40
//Auteur original :
41
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
41
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
42
//Autres auteurs :
42
//Autres auteurs :
43
*@author        Aucun
43
*@author        Aucun
44
*@copyright     Tela-Botanica 2000-2006
44
*@copyright     Tela-Botanica 2000-2006
45
*@version       $Revision: 1.4 $ $Date: 2007-08-28 14:23:55 $
45
*@version       $Revision: 1.4.2.1 $ $Date: 2008-10-22 07:45:46 $
46
// +------------------------------------------------------------------------------------------------------+
46
// +------------------------------------------------------------------------------------------------------+
47
*/
47
*/
Line 48... Line 48...
48
 
48
 
49
// +------------------------------------------------------------------------------------------------------+
49
// +------------------------------------------------------------------------------------------------------+
Line 95... Line 95...
95
	    	$options[$tab_parametres[0]] = trim($tab_parametres[1], '"');
95
	    	$options[$tab_parametres[0]] = trim($tab_parametres[1], '"');
96
	    } 
96
	    } 
97
    }
97
    }
Line 98... Line 98...
98
 
98
 
99
	//+----------------------------------------------------------------------------------------------------------------+
99
	//+----------------------------------------------------------------------------------------------------------------+
100
    // Gestion des erreurs de paramètrage
100
    // Gestion des erreurs de paramétrage
101
    $ok = true;
101
    $ok = true;
102
    if (!isset($options['interwiki'])) {
102
    if (!isset($options['interwiki'])) {
103
        $GLOBALS['_INCLURE_']['erreurs'][] = sprintf(CATEG_LG_ERREUR_INTERWIKI, $tab_applette_arguments[0]);
103
        $GLOBALS['_INCLURE_']['erreurs'][] = sprintf(CATEG_LG_ERREUR_INTERWIKI, $tab_applette_arguments[0]);
104
        $ok = false;
104
        $ok = false;
Line 125... Line 125...
125
	    
125
	    
126
	    if ($contenu != false) {
126
	    if ($contenu != false) {
127
		    $tab_matches = '';
127
		    $tab_matches = '';
128
		    preg_match($GLOBALS['_INCLURE_']['site'][$options['interwiki']]['preg'], $contenu, $tab_matches);
128
		    preg_match($GLOBALS['_INCLURE_']['site'][$options['interwiki']]['preg'], $contenu, $tab_matches);
129
		    $tab_encodage = '';
129
		    $tab_encodage = '';
130
		    if (preg_match('/charset=(.+)"/Ui', $contenu, $tab_encodage) || preg_match('/encoding="(.+)"/Ui', $contenu, $tab_encodage)) {
130
		    if (preg_match('/charset=(.+)"/Ui', $contenu, $tab_encodage) ||preg_match('/encoding="(.+)"/Ui', $contenu, $tab_encodage)) {
131
			    if (preg_match('/^(?:iso-8859-1|iso-8859-15)$/i', $GLOBALS['_INCLURE_']['encodage']) && preg_match('/utf-8/i', $tab_encodage[1])) {
131
			    if (preg_match('/^(?:iso-8859-1|iso-8859-15)$/i', $GLOBALS['_INCLURE_']['encodage']) && preg_match('/utf-8/i', $tab_encodage[1])) {
132
			        $GLOBALS['_INCLURE_']['sortie'] = utf8_decode($tab_matches[1]);
132
			        $GLOBALS['_INCLURE_']['sortie'] = utf8_decode($tab_matches[1]);
133
			    } else {
133
			    } else {
134
			        $GLOBALS['_INCLURE_']['sortie'] = $tab_matches[1];
134
			        $GLOBALS['_INCLURE_']['sortie'] = $tab_matches[1];
Line 160... Line 160...
160
}
160
}
Line 161... Line 161...
161
 
161
 
162
/* +--Fin du code ----------------------------------------------------------------------------------------+
162
/* +--Fin du code ----------------------------------------------------------------------------------------+
163
*
163
*
-
 
164
* $Log: not supported by cvs2svn $
-
 
165
* Revision 1.4  2007-08-28 14:23:55  jp_milcent
-
 
166
* Amélioration de la gestion de l'inclusion.
164
* $Log: not supported by cvs2svn $
167
*
165
* Revision 1.3  2007-08-28 14:14:13  jp_milcent
168
* Revision 1.3  2007-08-28 14:14:13  jp_milcent
166
* Correction de bogues empéchant l'affichage.
169
* Correction de bogues empêchant l'affichage.
167
*
170
*
168
* Revision 1.2  2006-12-08 15:57:30  jp_milcent
171
* Revision 1.2  2006-12-08 15:57:30  jp_milcent
169
* Amélioration de la gestion du débogage de l'applette inclure.
172
* Amélioration de la gestion du débogage de l'applette inclure.
170
*
173
*