Add some raw regexp tests.

diff --git a/test/lua/unit/regxep.lua b/test/lua/unit/regxep.lua
index 1277cce11d7ec7247e37bcb08038cdb1ba7a9b5d..e33d20d4337f5467f0f30ec40ef595c79c5f58a6 100644 (file)
--- a/test/lua/unit/regxep.lua
+++ b/test/lua/unit/regxep.lua
@@ -15,6 +15,10 @@ context("Regexp unit tests", function()
       {'m,test,', 'test123', false},
       {'/test/i', 'TeSt123', true},
       {'/тест/i', 'ТесТ', true},
+      -- Raw regexp
+      {'/\\S<[-\\w\\.]+\\@[-\\w\\.]+>/r', 'some<example@example.com>', true},
+      -- Cyrillic utf8 letter
+      {'/\\S<[-\\w\\.]+\\@[-\\w\\.]+>/r', 'some<example@exаmple.com>', false},
     }
     
     for _,c in ipairs(cases) do