changeset 82:1bbc79f41a1c

urllog: Rename few variables for clarity.
author Matti Hamalainen <ccr@tnsp.org>
date Sun, 11 Sep 2011 19:37:40 +0300
parents 17e542b7985a
children f171a9fb7b7b
files urllog.tcl
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/urllog.tcl	Sun Sep 11 18:49:06 2011 +0300
+++ b/urllog.tcl	Sun Sep 11 19:37:40 2011 +0300
@@ -315,13 +315,13 @@
     urllog_log "$uerrmsg on SQL:\n$sql"
     return 0
   }
-  set urlID [urldb last_insert_rowid]
+  set uid [urldb last_insert_rowid]
   urllog_log "Added URL ($urlNick@$urlChan): $urlStr"
 
 
   ### Let's say something, to confirm that everything went well.
   if {$urllog_shorturl != 0} {
-    set qstr "[urllog_get_short $urlID] "
+    set qstr "[urllog_get_short $uid] "
   } else {
     set qstr ""
   }
@@ -572,12 +572,12 @@
   }
 
   set iresults 0
-  set usql "SELECT id AS urlID, utime AS utime, url AS uurl, user AS uuser, host AS uhost FROM urls $fquery ORDER BY utime DESC LIMIT $ulimit"
+  set usql "SELECT id AS uid, utime AS utime, url AS uurl, user AS uuser, host AS uhost FROM urls $fquery ORDER BY utime DESC LIMIT $ulimit"
   urldb eval $usql {
     incr iresults
     set shortURL $uurl
-    if {$urllog_shorturl != 0 && $urlID != ""} {
-      set shortURL "$shortURL [urllog_get_short $urlID]"
+    if {$urllog_shorturl != 0 && $uid != ""} {
+      set shortURL "$shortURL [urllog_get_short $uid]"
     }
     urllog_msg $upublic $unick $uchan "#$iresults: $shortURL ($uuser@[urllog_ctime $utime])"
   }