Changeset 10

Timestamp:

09/30/06 15:54:30 (6 years ago)

Author:

cow

Message:

fix #1, shrink double spaces in question/answer

File:

• TriviaEngine/TriviaEngine-sqlite.tcl (modified) (1 diff)

TriviaEngine/TriviaEngine-sqlite.tcl

@@ -665 +665 @@
                 set trivia_q_answer [string toupper $answer]
                 set trivia_q_hint ""
+
+                #tidy up question and answer
+                regsub -all "  +" $trivia_q_question " " trivia_q_question
+                regsub -all "  +" $trivia_q_answer " " trivia_q_answer
+
+                set trivia_q_question [string trim $trivia_q_question]
+                set trivia_q_answer [string trim $trivia_q_answer]
         }