Revert "Force-normalize user emails for list unsubscribe."

[platal.git] / modules / lists.php

diff --git a/modules/lists.php b/modules/lists.php
index e1315e0..1683913 100644 (file)
--- a/modules/lists.php
+++ b/modules/lists.php
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2013 Polytechnique.org                              *
+ *  Copyright (C) 2003-2014 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
@@ -799,7 +799,7 @@ class ListsModule extends PLModule
 
             if (strpos(Env::v('del_owner'), '@') === false) {
                 if ($del_owner = User::getSilent(Env::t('del_owner'))) {
-                    $mlist->unsubscribeBulk(array($del_owner->forlifeEmail()));
+                    $mlist->removeOwner($del_owner->forlifeEmail());
                 }
             } else {
                 $mlist->removeOwner(Env::v('del_owner'));
@@ -1060,5 +1060,5 @@ class ListsModule extends PLModule
     }
 }
 
-// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
 ?>