[mew-int 2935] Re: Identify urls

[Christophe TROESTLER]

On Fri, 5 Nov 2010 16:40:34 -0200, Diogo F.S.Ramos wrote:
> 
> > (setq mew-regex-url
> >   (let ((u "[^ 　	\n>()\"`'“”]*"))
> >     (concat "\\b\\(\\(\\(file\\|news\\|mailto\\):\\)"
> > 	    "\\|\\(\\(s?https?\\|ftp\\|gopher\\|telnet\\|wais\\)://\\)\\)"
> > 	    "\\((" u ")\\|" u "[^ 　	\n>()\"`'“”.,:]\\)+")))
> 
> I couldn't eval your concat statement with C-xC-e but I guess I got
> the idea.

For some reason it was not rendered well (but the citation looks
fine).  Let me try to attach it as as file.
-------------- next part --------------
(setq mew-regex-url
  (let ((u "[^ 　	\n>()\"`'“”]*"))
    (concat "\\b\\(\\(\\(file\\|news\\|mailto\\):\\)"
	    "\\|\\(\\(s?https?\\|ftp\\|gopher\\|telnet\\|wais\\)://\\)\\)"
	    "\\((" u ")\\|" u "[^ 　	\n>()\"`'“”.,:]\\)+")))