diff --git a/webif/lib/ts.class b/webif/lib/ts.class
index 63c6cda..78f6078 100644
--- a/webif/lib/ts.class
+++ b/webif/lib/ts.class
@@ -270,6 +270,11 @@ proc {ts fetch} {file {checked 0}} {
 	return [ts parse $file [ts exec $file]]
 }
 
+proc {ts fetchhmt} {file} {
+	if {[file extension $file] ne ".hmt"} { return 0 }
+	return [ts parse $file [ts exec $file]]
+}
+
 ts method delete {} {
 	foreach f [$self fileset] {
 		file tdelete $f