Mercurial > urweb

view tests/crypt.ur @ 1591:20f898c29525

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tweaks to choices of source positions to use in error messages, including for subSgn
author Adam Chlipala <adam@chlipala.net>
date Sat, 05 Nov 2011 13:12:07 -0400
parents a5bfed32d4f7
children
line wrap: on
line source
fun cryptIt r = return <xml><body>
  {[crypt r.Pass "AB"]}
</body></xml>

fun main () = return <xml><body>
  <form><textbox{#Pass}/> <submit action={cryptIt}/></form>
</body></xml>