Changeset 26 for TriviaEngine

Timestamp:

11/02/06 18:48:27 (6 years ago)

Author:

james

Message:

QUAD DAMAGE in blue
inject control chars into names in ranks to try to stop hilights

File:

• TriviaEngine/TriviaEngine-sqlite.tcl (modified) (3 diffs)

TriviaEngine/TriviaEngine-sqlite.tcl

@@ -447 +447 @@
 proc trivia_get_run { row } {
 #<<<
+        global trivia_channel trivia_c
         switch $row {
                 3 {
@@ -452 +453 @@
                 }
                 4 {
-                        puthelp "PRIVMSG $trivia_channel :QUAD DAMAGE!"
+                        puthelp "PRIVMSG $trivia_channel :$trivia_c(blue)QUAD DAMAGE!"
                         return "is on a roll ..."
                 }
@@ -1385 +1386 @@
                 set line [list]
                 lappend line $user_id
-                lappend line $user_name
+                lappend line [trivia_question_inject $user_name]
                 lappend line $user_score
                 putlog "adding line $line"