auto.tcl misses support for tcloo, the code below simply adds the class name:
foreach cmd {oo::class class} {
auto_mkindex_parser::command $cmd {ecmd name body} {
variable index
variable scriptFile
append index "set [list auto_index([fullname $name])]"
append index " \[list source \[file join \$dir [list $scriptFile]\]\]\n"
}
}