# Sunscript web site template definitions
# SCCS: @(#) .tml 1.18 97/12/23 21:15:27

# Site-specific modules from libtml

package require mypage 1.0
package require faq 1.2

# Standard Tcl Library

package require html
package require ncgi

# This allows to reset the package by appending ?packageReset=faq
# for instance to a .tml query

foreach pkg [ncgi::valueList packageReset] {
    package forget $pkg
    package require $pkg
    Stderr "Reset package $pkg"
}

# This defines the URLs that appear in the footer

mypage::contents {
    Home		/
    Status		/status	
    "Hacks Page"	/hacks.html
    Register		/register.html
    "CGI Tests"		/forms/
    "Templates"		/templates/
    "Access Control"	/access/
    "Reference Manual"	/manual/reference.html
}

# These are the default colors and fonts for various HTML objects

# #cc3300 is the "Tcl read"
# #003399 is the "Tcl blue"

html::init {
    body.bgcolor	white
    body.text		black
    thinrule.bgcolor	#cc3300
    font.face		arial
}

lappend tmllist [info script]
