c405/dojo
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

filtro msg

Browse Source
This commit is contained in:
mynah
2019-03-04 03:39:20 +01:00
parent b0b90fef9c
commit 0f8f944422
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/Dojo/Model/Vuelo.pm
View File

@@ -95,7 +95,7 @@ sub new { bless {}, shift };
my $q="insert into entrada (nombre,correo,pagina,texto,fecha) values(?,?,?,?,now() )" ; my $q="insert into entrada (nombre,correo,pagina,texto,fecha) values(?,?,?,?,now() )" ;
my @a=@_; my @a=@_;
#simple method to ignore spam #simple method to ignore spam
return _writemsg($q,@a) unless $a[3]=~m/html|website|\<a/; return _writemsg($q,@a) unless $a[3]=~m/http|website|\<a/;
return 0; return 0;
} }
#============================================================================== #==============================================================================