From 9d569814cdda3c3b323ca453162fab9b23af0146 Mon Sep 17 00:00:00 2001 From: dms Date: Fri, 4 Aug 2000 15:19:24 +0000 Subject: [PATCH] at -> mailto remnants from stock infobot removed git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@29 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/Factoids/Statement.pl | 5 ----- 1 file changed, 5 deletions(-) diff --git a/src/Factoids/Statement.pl b/src/Factoids/Statement.pl index 09e59f9..fe83ab3 100644 --- a/src/Factoids/Statement.pl +++ b/src/Factoids/Statement.pl @@ -31,11 +31,6 @@ sub doStatement { $in =~ s/ www\./ http:\/\/www\./ig; $in =~ s/ ftp\./ ftp:\/\/ftp\./ig; - # look for a "type nugget". this should be externalized. - $urlType = "mailto" if ($in =~ /\bmailto:.+\@.+\..{2,}/i); - $urlType = "mailto" if ($in =~ s/\b(\S+\@\S+\.\S{2,})/mailto:$1/gi); - $in =~ s/(mailto:)+/mailto:/g; - $urlType = "about" if ($in =~ /\babout:/i); $urlType = 'afp' if ($in =~ /\bafp:/); $urlType = 'file' if ($in =~ /\bfile:/); -- 2.39.5