forked from hummypkg/webif
Add fetchhmt function to support lone .htm file operation
This commit is contained in:
parent
72c7e6e3b1
commit
043865aa00
@ -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
|
||||
|
Loading…
x
Reference in New Issue
Block a user