From 42bb1f0d354150a13cc193f19758d663b746291e Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
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 {
             # <a href="...."> .. </a> 
             # we're not using nonest - otherwise body isn't set
             if {$nofollow} continue
-- 
1.7.10.4