# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1588328241 -10800
# Node ID 794ecdfe6ac0918041237424d6621a93a78ccc41
# Parent  0e3d24e02239a14383dd7f4da32149933d97125e
quotedb: Fix handling of 'vote' command parameters in case of '!xxx vote <1|-1>' to vote for the latest added quote.

diff -r 0e3d24e02239 -r 794ecdfe6ac0 quotedb.tcl
--- a/quotedb.tcl	Thu Apr 30 23:59:04 2020 +0300
+++ b/quotedb.tcl	Fri May 01 13:17:21 2020 +0300
@@ -246,7 +246,7 @@
   }
 
   set uvote 1
-  if {$utext == "" || [regexp {^\s*-1$} $utext umatch uvote]} {
+  if {$utext == "" || [regexp {^\s*(-?1)\s*$} $utext umatch uvote]} {
     set usql "SELECT max(id) AS qid FROM ${utable}"
     set uid 0
     qdb_handle eval $usql { set uid $qid }