Logged In: NO

In my case, this problem was because Mtype_ReadTypes doesn't read the mime types file, because a wrong line in the 'httpdthread.tcl' file :
set path [lindex $path 0]
That truncate the true path (wiht spaces)
You can simply comment this line:

foreach path [list \ [file join $Config(lib) mime.types] \ [glob -nocomplain [file join $Config(lib) tclhttpd* mime.types]] \ ] {
# commented, because a valid path can contain spaces !!
# if {[llength $path] > 0} {
# set path [lindex $path 0]
# }
if {[file exists $path]} {
Mtype_ReadTypes $path
break
}
}