diff --git a/htdocs/main.inc.php b/htdocs/main.inc.php
index 7fc85b664a5..00253e1bb62 100644
--- a/htdocs/main.inc.php
+++ b/htdocs/main.inc.php
@@ -161,112 +161,123 @@ if (defined("MAIN_NOT_INSTALLED"))
}
+
+/**
+ * \brief Affiche en-tête html
+ * \param head lignes d'en-tete head
+ * \param title titre page web
+ * \param target target du menu Accueil
+ */
+function top_htmlhead($head, $title="", $target="")
+{
+ global $user, $conf, $langs, $db;
+
+ print '';
+ print "\n";
+
+ print $langs->lang_header();
+ print $head;
+
+ // Affiche meta
+ print ''."\n"; // Evite indexation par robots
+ print ''."\n";
+
+ // Affiche title
+ if (strlen($title) > 0)
+ {
+ print '
Dolibarr - '.$title.'';
+ }
+ else
+ {
+ if (defined("MAIN_TITLE"))
+ {
+ print "".MAIN_TITLE."";
+ }
+ else
+ {
+ print 'Dolibarr';
+ }
+ }
+ print "\n";
+
+ // Affiche style sheets et link
+ print ''."\n";
+ print ''."\n";
+
+ // Definition en alternate style sheet des feuilles de styles les plus maintenues
+ print ''."\n";
+ print ''."\n";
+ print ''."\n";
+
+ print ''."\n";
+ print ''."\n";
+ print ''."\n";
+ print ''."\n";
+
+ print "\n";
+}
+
/**
* \brief Affiche en-tête html + la barre de menu supérieure
* \param head lignes d'en-tete head
* \param title titre page web
* \param target target du menu Accueil
*/
-
function top_menu($head, $title="", $target="")
{
- global $user, $conf, $langs, $db;
+ global $user, $conf, $langs, $db;
- print '';
- print "\n";
+ top_htmlhead($head, $title, $target);
- print $langs->lang_header();
- print $head;
+ print '';
+ print '
';
- // Affiche meta
- print ''."\n"; // Evite indexation par robots
- print ''."\n";
-
- // Affiche title
- if (strlen($title) > 0)
+ /*
+ * Si la constante MAIN_NEED_UPDATE est définie (par le script de migration sql en général), c'est que
+ * les données ont besoin d'un remaniement. Il faut passer le update.php
+ */
+ if (defined("MAIN_NEED_UPDATE") && MAIN_NEED_UPDATE)
{
- print 'Dolibarr - '.$title.'';
- }
- else
- {
- if (defined("MAIN_TITLE"))
- {
- print "".MAIN_TITLE."";
- }
- else
- {
- print 'Dolibarr';
- }
- }
- print "\n";
-
- // Affiche style sheets et link
- print ''."\n";
- print ''."\n";
-
- // Definition en alternate style sheet des feuilles de styles les plus maintenues
- print ''."\n";
- print ''."\n";
- print ''."\n";
-
- print ''."\n";
- print ''."\n";
- print ''."\n";
- print ''."\n";
-
- print "\n";
- print '';
- print '
';
-
-
- /*
- * Si la constante MAIN_NEED_UPDATE est définie (par le script de migration sql en général), c'est que
- * les données ont besoin d'un remaniement. Il faut passer le update.php
- */
- if (defined("MAIN_NEED_UPDATE") && MAIN_NEED_UPDATE)
- {
- $langs->load("admin");
- print '