- {-# LANGUAGE OverloadedStrings #-}
-
- module App.Info (
- Info(..)
- ) where
-
- import Request
- import Template
- import Network.FastCGI
-
- data Info = Info
-
- instance RequestHandler Info where
- handle handler = do
- result <- render "info" [("pagetitle", "Info")]
- output result
|