#!/usr/local/bin/websh3.6.0b5


source websh.interpclass.initializer

set html 1

foreach file [glob *.ws3] {

    set out [file rootname $file].html

    web::response -resetall

    catch {unset output}
    web::response -select #output
    web::response -sendheader 0

    web::include $file

    set fh [open $out w]
    puts -nonewline $fh $output
    close $fh

}