^isEmail из auth.p бракует i@domain.ru

Modjo7 16.09.2008 02:06 / 16.09.2008 02:10

Собсно сабж. Код скопирован из auth.p Мишиного класса авторизации:

^if(def $form:email &&
	!(^form:email.match[^^\w+([.-]?\w+)+\@\w+([.-]?\w+)*\.[a-z]{2,4}^$][i])){
	^err.append{некорректный емейл}
}

Мой мозг отказывается понимать regexp, в принципе :)

---