changeset 47:6cf21069ac10

Show score/rating for single quotedb quotes when requested by index or as random.
author Matti Hamalainen <ccr@tnsp.org>
date Wed, 07 Sep 2011 14:09:49 +0300
parents 80fa09f868d4
children 506ce7f074e4
files quotedb.tcl
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/quotedb.tcl	Wed Sep 07 14:08:42 2011 +0300
+++ b/quotedb.tcl	Wed Sep 07 14:09:49 2011 +0300
@@ -280,19 +280,21 @@
 proc qdb_get {utable unick uchan uindex upublic} {
   global quotedb
 
-  set usql "SELECT id AS quoteID, utext AS utext, user AS uuser FROM $utable"
+  set usql "SELECT total(${utable}_votes.vote) AS uvote, ${utable}.id AS quoteID, ${utable}.utext AS utext, ${utable}.user AS uuser FROM ${utable} LEFT JOIN ${utable}_votes ON ${utable}_votes.urlid = ${utable}.id"
+#  set usql "$usql GROUP BY ${utable}.id"
+#  set usql "SELECT id AS quoteID, utext AS utext, user AS uuser FROM $utable"
   if {$uindex >= 0} {
-    set usql "$usql WHERE id=$uindex"
+    set usql "$usql WHERE ${utable}.id=$uindex GROUP BY ${utable}.id"
     qdb_log "$unick searched $utable #$uindex"
   } else {
-    set usql "$usql ORDER BY RANDOM() LIMIT 1"
+    set usql "$usql GROUP BY ${utable}.id ORDER BY RANDOM() LIMIT 1"
     qdb_log "$unick get random $utable"
   }
 
   set uresults 0
   quotedb eval $usql {
     incr uresults
-    qdb_msg $upublic $unick $uchan "#${quoteID}: $utext ($uuser)"
+    qdb_msg $upublic $unick $uchan "#${quoteID}: $utext ($uuser, $uvote)"
   }
 }