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
   }