Mercurial > hg > egg-tcls

comparison feeds.tcl @ 434:366324c417d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
feeds: Oops, use utl_ctime instead of feeds_ctime which does not exist anymore.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 09 Jan 2017 04:10:36 +0200
parents 2484f438b7d3
children 5edaebbbb7f2
comparison
equal deleted inserted replaced
433:2484f438b7d3 434:366324c417d8
162 global feeds_dbh 162 global feeds_dbh
163 set ufound 0 163 set ufound 0
164 164
165 set usql "SELECT url AS uurl, feed AS ufeed, title AS utitle, utime AS utime FROM feeds WHERE feed LIKE '%[string tolower [utl_escape $utext]]%' ORDER BY utime DESC LIMIT 1" 165 set usql "SELECT url AS uurl, feed AS ufeed, title AS utitle, utime AS utime FROM feeds WHERE feed LIKE '%[string tolower [utl_escape $utext]]%' ORDER BY utime DESC LIMIT 1"
166 feeds_dbh eval $usql { 166 feeds_dbh eval $usql {
167 feeds_smsg $uchan "Uusin '$ufeed' / [feeds_ctime $utime]: $utitle -- $uurl" 167 feeds_smsg $uchan "Uusin '$ufeed' / [utl_ctime $utime]: $utitle -- $uurl"
168 set ufound 1 168 set ufound 1
169 } 169 }
170 170
171 if {$ufound == 0} { 171 if {$ufound == 0} {
172 feeds_smsg $uchan "Ei osumia haulla '$utext'." 172 feeds_smsg $uchan "Ei osumia haulla '$utext'."