Mercurial > hg > egg-tcls
changeset 473:d155cec91375
urllog: Fixes to Twitter title matching.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Mon, 05 Nov 2018 17:07:38 +0200 |
parents | 04b629038256 |
children | 575e9db7667c |
files | urllog.tcl |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/urllog.tcl Fri Oct 26 15:42:28 2018 +0300 +++ b/urllog.tcl Mon Nov 05 17:07:38 2018 +0200 @@ -490,7 +490,7 @@ # Get the document title, if any set urlTitle "" - if {[regexp -nocase -- "<meta name=\"twitter:title\" content=\"(.\*\?)\"\/\?>" $udata umatches urlTitle]} { + if {[regexp -nocase -- "<meta name=\"twitter:title\" content=\"(.\*\?)\"\\s\*\/\?>" $udata umatches urlTitle]} { # ... } elseif {[regexp -nocase -- "<title.\*\?>(.\*\?)</title>" $udata umatches urlTitle]} { # ...