* Write Emails: header in output

1 files changed, 3 insertions, 3 deletions

diff --git a/src/url.c b/src/url.c
index 596d17d3a..1251b06b6 100644
--- a/src/url.c
+++ b/src/url.c
@@ -1117,17 +1117,17 @@ url_email_start (const gchar *begin, const gchar *end, const gchar *pos, url_mat
 	if (pos > begin && *pos == '@') {
 		/* Try to extract it with username */
 		p = pos - 1;
-		while (p > begin && is_atom (*p)) {
+		while (p > begin && (is_domain (*p) || *p == '.')) {
 			p --;
 		}
-		if (!is_atom (*p)) {
+		if (!is_domain (*p)) {
 			match->m_begin = p + 1;
 			return TRUE;
 		}
 	}
 	else {
 		p = pos + strlen (match->pattern);
-		if (is_atom (*p)) {
+		if (is_domain (*p)) {
 			match->m_begin = p;
 			return TRUE;
 		}