Mercurial > hg > egg-tcls

changeset 630:b7e3a47ed072

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tj: Add few comments.
author Matti Hamalainen <ccr@tnsp.org>
date Thu, 11 Feb 2021 16:23:45 +0200
parents 62cf145b67f8
children 9596cd122639
files tj.tcl
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/tj.tcl	Thu Feb 11 11:12:21 2021 +0200
+++ b/tj.tcl	Thu Feb 11 16:23:45 2021 +0200
@@ -468,9 +468,11 @@
       return 1
     }
 
+    # If empty, clear to global default id
     if {$uid == "" || $uid == "{}" || $uid == "*"} {
       set uid $tj_default_id
     } else {
+      # Check if a TJ exists with this id?
       set usql "SELECT COUNT(*) FROM tj WHERE uuser='[utl_escape $uhand]' AND uid='[utl_escape $uid]'"
       if {[catch {set nids [tj_dbh onecolumn $usql]} uerrmsg]} {
         tj_msg $upublic $unick $uchan "err_sql" [list $uerrmsg]