#!/mod/bin/jimsh

package require cgi
source /mod/webif/lib/setup
require cat

set file [cgi_get file]
set file "[file rootname $file].thm"

if {![file exists $file]} {
	httpheader "text/plain"
	puts "No such file, $file"
	exit
}

httpheader "image/bmp"
cat "/mod/webif/lib/bmpheader"
cat $file

