* Creation of lists with upper case names should be coerced to lower case.

   (LP: #1117176)

1 files changed, 27 insertions, 0 deletions

diff --git a/src/mailman/runners/tests/test_lmtp.py b/src/mailman/runners/tests/test_lmtp.py
index a5c2105d9..bd30fc7aa 100644
--- a/src/mailman/runners/tests/test_lmtp.py
+++ b/src/mailman/runners/tests/test_lmtp.py
@@ -117,3 +117,30 @@ Message-ID: <ant>
         # directory in var/queue.
         queue_directory = os.path.join(config.QUEUE_DIR, 'lmtp')
         self.assertFalse(os.path.isdir(queue_directory))
+
+
+
+class TestBugs(unittest.TestCase):
+    """Test some LMTP related bugs."""
+
+    layer = LMTPLayer
+
+    def setUp(self):
+        self._lmtp = get_lmtp_client(quiet=True)
+        self._lmtp.lhlo('remote.example.org')
+
+    def test_lp1117176(self):
+        # Upper cased list names can't be sent to via LMTP.
+        with transaction():
+            create_list('my-LIST@example.com')
+        self._lmtp.sendmail('anne@example.com', ['my-list@example.com'], """\
+From: anne@example.com
+To: my-list@example.com
+Subject: My subject
+Message-ID: <alpha>
+
+""")
+        messages = get_queue_messages('in')
+        self.assertEqual(len(messages), 1)
+        self.assertEqual(messages[0].msgdata['listname'],
+                         'my-list@example.com')