# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1610283450 -7200
# Node ID d5fc3ecee4c7ca381682227c6212411ac13bab7a
# Parent  1ace0cbde1dd3ce75d30ef4fec01bd67f5c56154
urllog: Handle 303 redirects.

diff -r 1ace0cbde1dd -r d5fc3ecee4c7 urllog.tcl
--- a/urllog.tcl	Tue Jan 05 09:13:55 2021 +0200
+++ b/urllog.tcl	Sun Jan 10 14:57:30 2021 +0200
@@ -348,7 +348,7 @@
   }
 
   ### Handle redirects
-  if {$ucode >= 301 && $ucode <= 302} {
+  if {$ucode >= 301 && $ucode <= 303} {
     set nurlStr $umeta(Location)
     if {![regexp "\[a-z\]+://" $nurlStr]} {
       if {[string range $nurlStr 0 0] != "/"} {
@@ -369,7 +369,7 @@
   }
 
   ### Handle 2nd level redirects
-  if {$ucode >= 301 && $ucode <= 302} {
+  if {$ucode >= 301 && $ucode <= 303} {
     set nurlStr $umeta(Location)
     if {![regexp "\[a-z\]+://" $nurlStr]} {
       if {[string range $nurlStr 0 0] != "/"} {