From 42bb1f0d354150a13cc193f19758d663b746291e Mon Sep 17 00:00:00 2001 From: Adam Dickmeiss Date: Thu, 18 Sep 2003 07:41:25 +0000 Subject: [PATCH] Nonest on anchors --- robot.tcl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/robot.tcl b/robot.tcl index 73d558a..9851f19 100755 --- a/robot.tcl +++ b/robot.tcl @@ -1,5 +1,5 @@ #!/usr/bin/tclsh -# $Id: robot.tcl,v 1.45 2003/06/11 10:29:41 adam Exp $ +# $Id: robot.tcl,v 1.46 2003/09/18 07:41:25 adam Exp $ # proc RobotFileNext1 {area lead} { # puts "RobotFileNext1 area=$area lead=$lead" @@ -737,7 +737,7 @@ proc RobotTextHtml {task url out} { set href [string trim $parm(href)] if {![RobotHref $task $url href host path]} continue set URL($task,$url,bpath) $path - } a { + } -nonest a { # .. # we're not using nonest - otherwise body isn't set if {$nofollow} continue -- 1.7.10.4