From 2e203397567386e2806359f5ac678491d184b047 Mon Sep 17 00:00:00 2001 From: Adam Dickmeiss Date: Mon, 25 Mar 2002 16:13:21 +0000 Subject: [PATCH] Remove code that skips ?'s in URL --- robot.tcl | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/robot.tcl b/robot.tcl index bfe875f..793298c 100755 --- a/robot.tcl +++ b/robot.tcl @@ -1,5 +1,5 @@ #!/usr/bin/tclsh -# $Id: robot.tcl,v 1.32 2002/03/25 16:11:08 adam Exp $ +# $Id: robot.tcl,v 1.33 2002/03/25 16:13:21 adam Exp $ # proc RobotFileNext1 {area lead} { # puts "RobotFileNext1 area=$area lead=$lead" @@ -288,9 +288,8 @@ proc RobotHref {url hrefx hostx pathx} { if {[string length $href] > 256} { return 0 } -# if {[string first {?} $href] >= 0} { -# return 0 -# } + +# Skip pages that have ? in them # if {[string first {?} $url] >= 0 && [string first {?} $href] >= 0} { # return 0 # } -- 1.7.10.4