diff --git a/src/DrawResources/TestCommands.tcl b/src/DrawResources/TestCommands.tcl index c2bb23ad3b..1b057f196a 100644 --- a/src/DrawResources/TestCommands.tcl +++ b/src/DrawResources/TestCommands.tcl @@ -1175,7 +1175,7 @@ proc _log_html {file log {title {}}} { # add images if present set imgbasename [file rootname [file tail $file]] foreach img [lsort [glob -nocomplain -directory [file dirname $file] -tails ${imgbasename}*.gif ${imgbasename}*.png ${imgbasename}*.jpg]] { - puts $fd "

" + puts $fd "

[file tail $img]

" } # print log body, trying to add HTML links to script files on lines like