diff --git a/htdocs/index.php b/htdocs/index.php index b9dcb835f22..b495ddf02ce 100644 --- a/htdocs/index.php +++ b/htdocs/index.php @@ -39,6 +39,7 @@ if (! isset($_GET["mainmenu"])) $_GET["mainmenu"]="home"; llxHeader(); + $userstring=$user->prenom . ' ' . $user->nom .' ('.$user->login.')'; print_fiche_titre($langs->trans("WelcomeString",dolibarr_print_date(mktime(),"%A %d %B %Y"),$userstring), ''.$langs->trans("About").''); @@ -47,6 +48,16 @@ if (defined("MAIN_MOTD") && strlen(trim(MAIN_MOTD))) print '
'.nl2br(MAIN_MOTD).'
'; } +// Affiche warning répertoire install existe (si utilisateur admin) +if ($user->admin) +{ + if (is_dir(DOL_DOCUMENT_ROOT."/install")) + { + $langs->load("other"); + print '
'.$langs->trans("WarningInstallDirExists",DOL_DOCUMENT_ROOT."/install").' '; + print $langs->trans("WarningUntilDirRemoved",DOL_DOCUMENT_ROOT."/install").'
'; + } +} print "
\n"; diff --git a/htdocs/langs/en_US/other.lang b/htdocs/langs/en_US/other.lang index 504c2a188bb..202be16733b 100644 --- a/htdocs/langs/en_US/other.lang +++ b/htdocs/langs/en_US/other.lang @@ -18,4 +18,6 @@ NbOfAttachedFiles=Number of attached files/documents TotalSizeOfAttachedFiles=Total size of attached files/documents AttachANewFile=Attach a new file/document LinkedObject=Linked object -NbOfActiveNotifications=Number of notifications \ No newline at end of file +NbOfActiveNotifications=Number of notifications +WarningInstallDirExists=Warning, install directory (%s) still exists. This is a serious security hole. You should removed it as soon as possible. +WarningUntilDirRemoved=This warning will keep active while directory is present (Shown only for admin users). \ No newline at end of file diff --git a/htdocs/langs/fr_FR/other.lang b/htdocs/langs/fr_FR/other.lang index 6803024b217..b2d8a4b3a88 100644 --- a/htdocs/langs/fr_FR/other.lang +++ b/htdocs/langs/fr_FR/other.lang @@ -19,3 +19,5 @@ TotalSizeOfAttachedFiles=Taille total des fichiers/documents li AttachANewFile=Ajouter un nouveau fichier/document LinkedObject=Objet lié NbOfActiveNotifications=Nombre de notifications +WarningInstallDirExists=Attention, le répertoire install (%s) existe toujours. Il s'agit d'une faille sérieuse de sécurité. Vous devriez l'effacer dès que possible. +WarningUntilDirRemoved=Cette alerte restera active tant que le répertoire existera (bien que visible aux utilisateurs admin uniquement). \ No newline at end of file