Fix case sensitivity issues with Xnet's ML names

[platal.git] / modules / xnetlists.php

diff --git a/modules/xnetlists.php b/modules/xnetlists.php
index 299d4cd..70c387f 100644 (file)
--- a/modules/xnetlists.php
+++ b/modules/xnetlists.php
@@ -75,7 +75,7 @@ class XnetListsModule extends ListsModule
         }
         $this->prepare_client($page);
 
-        $page->changeTpl('xnetlists/index.tpl');
+        new_group_page('xnetlists/index.tpl');
 
         if (Get::has('del')) {
             $this->client->unsubscribe(Get::v('del'));
@@ -133,7 +133,7 @@ class XnetListsModule extends ListsModule
             return;
         }
 
-        $liste = Post::v('liste');
+        $liste = strtolower(Post::v('liste'));
 
         if (!preg_match("/^[a-zA-Z0-9\-]*$/", $liste)) {
             $page->trig('le nom de la liste ne doit contenir que des lettres, chiffres et tirets');
@@ -245,7 +245,7 @@ class XnetListsModule extends ListsModule
             return PL_NOT_FOUND;
         }
 
-        new_groupadmin_page('xnet/groupe/alias-admin.tpl');
+        new_groupadmin_page('xnetlists/alias-admin.tpl');
 
         if (Env::has('add_member')) {
             $add = Env::v('add_member');
@@ -320,7 +320,7 @@ class XnetListsModule extends ListsModule
         if (!$globals->asso('mail_domain')) {
             return PL_NOT_FOUND;
         }
-        new_groupadmin_page('xnet/groupe/alias-create.tpl');
+        new_groupadmin_page('xnetlists/alias-create.tpl');
 
         if (!Post::has('submit')) {
             return;