monnier pushed a commit to branch master
in repository elpa.
commit 58a67667eb3c928afae8b65726898764db335162
Author: Teemu Likonen <[email protected]>
Date: Wed Jun 22 10:43:27 2011 +0300
Escape \\< with \\=\\< in wcheck-language-data doc string
---
wcheck-mode.el | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/wcheck-mode.el b/wcheck-mode.el
index efbb1aa..15f6d4f 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -693,7 +693,8 @@ Then the needed functions:
(defun email-address-detect (strings)
(let (addresses)
(dolist (string strings addresses)
- (when (string-match \"\\\\<[a-z.-]+\\\\>@\\\\<[a-z.-]+\\\\>\"
+ (when (string-match \"\
+\\\\=\\<[a-z.-]+\\\\=\\>@\\\\=\\<[a-z.-]+\\\\=\\>\"
string)
(push (match-string-no-properties 0 string) addresses)))))
