Mercurial > hg > egg-tcls
changeset 41:636fa4bf0814
Remove some commented out debugging stuff.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 06 Sep 2011 21:16:20 +0300 |
parents | 3c118e1d1137 |
children | 6f8d699fe03f |
files | quotedb.tcl |
diffstat | 1 files changed, 2 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/quotedb.tcl Tue Sep 06 21:15:49 2011 +0300 +++ b/quotedb.tcl Tue Sep 06 21:16:20 2011 +0300 @@ -199,11 +199,8 @@ proc qdb_toplist {utable unick uchan unum upublic} { global quotedb - # DEBUG! - return 0 - - if {$unum < 3 || $unum > 10} { - qdb_msg $upublic $unick $uchan "top-listan pituus oltava 3-10." + if {$unum < 2 || $unum > 4} { +# qdb_msg $upublic $unick $uchan "top-listan pituus oltava 2-4." return 0 }