Subversion Repositories Applications.papyrus

Compare Revisions

Ignore whitespace Rev 1268 → Rev 1269

/branches/livraison_menes/papyrus/applications/admin_site/bibliotheque/adsi_site.fonct.php
19,7 → 19,7
// | License along with this library; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: adsi_site.fonct.php,v 1.32 2006-10-16 15:49:06 ddelon Exp $
// CVS : $Id: adsi_site.fonct.php,v 1.32.2.1 2007-03-19 14:57:44 alexandre_tb Exp $
/**
* Bibliothèque de fonctions d'admininistration des projets
*
34,7 → 34,7
*@author Alexandre GRANIER <alexandre@tela-botanica.org>
*@author Laurent COUDOUNEAU <lc@gsite.org>
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.32 $ $Date: 2006-10-16 15:49:06 $
*@version $Revision: 1.32.2.1 $ $Date: 2007-03-19 14:57:44 $
// +------------------------------------------------------------------------------------------------------+
*/
 
915,8 → 915,17
'Fichier n° : '. __FILE__ .'<br /><p>';
return $message;
}
$objet_pear_ftp->mkdir(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha']) ;
$resultat = $objet_pear_ftp->mkdir(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha']) ;
if (PEAR::isError($resultat)) {
$message = '<p class="pap_erreur"> ERREUR Papyrus admin : impossible de créer le répertoire par ftp.<br />'.
'Répertoire : '. PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha'] .'<br />'.
'Erreur origine : '. $resultat->getMessage() .'<br />'.
'Informations de debogage : '.$resultat->getDebugInfo().'<br />'.
'Ligne n° : '. __LINE__ .'<br />'.
'Fichier n° : '. __FILE__ .'<br /></p>';
return $message;
}
//$objet_pear_ftp->cd(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha']) ;
foreach ($tab_rep_langue as $nom_rep_langue) {
$objet_pear_ftp->mkdir(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha'].GEN_SEP.$nom_rep_langue) ;
928,6 → 937,7
$message = '<p class="pap_erreur"> ERREUR Papyrus admin : impossible de créer le répertoire par ftp.<br />'.
'Répertoire : '. $chemin_repertoire .'<br />'.
'Erreur origine : '. $resultat->getMessage() .'<br />'.
'Informations de debogage : '.$resultat->getDebugInfo().'<br />'.
'Ligne n° : '. __LINE__ .'<br />'.
'Fichier n° : '. __FILE__ .'<br /></p>';
return $message;
1818,6 → 1828,9
// +- Fin du code source --------------------------------------------------------------------------------+
/*
* $Log: not supported by cvs2svn $
* Revision 1.32 2006/10/16 15:49:06 ddelon
* Refactorisation code mulitlinguisme et gestion menu invisibles
*
* Revision 1.31 2006/09/12 09:54:02 ddelon
* Affichage des identifications disponibles lors de la création d'un site. Un bug faisait que l'affichage de l'identification par défaut ne fonctionnait plus en creation.
*