# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1652444474 -10800
# Node ID 46fc0bc95195f13373a099ccb347b6f7454896eb
# Parent  5163d582e3964554900eee6c6207857a622edeff
urllog: Improve some logging / error messages.

diff -r 5163d582e396 -r 46fc0bc95195 urllog.tcl
--- a/urllog.tcl	Sun Nov 28 04:20:18 2021 +0200
+++ b/urllog.tcl	Fri May 13 15:21:14 2022 +0300
@@ -225,12 +225,12 @@
 
   set uresult [utl_http_do_request $urlHeaders $urlStr ustatus uscode ucode udata umeta]
   if {$uresult == -1} {
-    urllog_verb_msg 1 $urlNick $urlChan "err_http_get" [list $urlStr $uscode]
-    urllog_log "HTTP request failed: $uscode"
+    urllog_verb_msg 1 $urlNick $urlChan "err_http_get" [list $urlStr $ustatus $uscode $ucode]
+    urllog_log "HTTP request failed: $ustatus / $uscode $ucode"
     return 0
   } elseif {$uresult < 0} {
     urllog_verb_msg 1 $urlNick $urlChan "err_http_status" [list $urlStr $ustatus $uscode $ucode]
-    urllog_log "Error in HTTP request: $ustatus / $uscode ($urlStr)"
+    urllog_log "Error in HTTP request: $ustatus / $uscode $ucode ($urlStr)"
     return 0
   }