X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=robot.tcl;h=608f562c089c2d4a4593d57ccad33f0df826f866;hb=3201adca0560cf447024e23b0e572c9b5137111c;hp=9851f1970de51e6b0ea998eeb1b2fd556477695f;hpb=42bb1f0d354150a13cc193f19758d663b746291e;p=tclrobot.git diff --git a/robot.tcl b/robot.tcl index 9851f19..608f562 100755 --- a/robot.tcl +++ b/robot.tcl @@ -1,5 +1,5 @@ #!/usr/bin/tclsh -# $Id: robot.tcl,v 1.46 2003/09/18 07:41:25 adam Exp $ +# $Id: robot.tcl,v 1.47 2003/12/10 09:58:22 adam Exp $ # proc RobotFileNext1 {area lead} { # puts "RobotFileNext1 area=$area lead=$lead" @@ -707,7 +707,7 @@ proc RobotTextHtml {task url out} { set metacontent $parm($a) } } - unset parm($al) + unset parm($a) } puts $out ">" # go through robots directives (af any)