Commit 0f4e9d72 authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2002-11-10 16:20:52 by cvscast] Empty log message

Original author: cvscast
Date: 2002-11-10 16:20:52+00:00
parent ca25e33e
......@@ -47,7 +47,11 @@ let html_header p =
<h1>CDuce online prototype</h1>
if !persistant then (p "(session #"; p !session_id; p ")<br>")
if !persistant then
(p "You're running the CDuce prototype in session mode: values and
types accepted by CDuce when you click 'Submit' will be available
for subsequent requests.";
p "<small> (session #"; p !session_id; p ")</small><br>")
let html_form p content =
p "<form method=post>";
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment