view select.urs @ 9:1e04008eaef7

Add version of warning with a format wrapper.
author Karn Kallio <kkallio@eka>
date Tue, 21 Jun 2011 17:32:36 -0430
parents 4d8165e8f89a
children
line wrap: on
line source
val crender : {Choices : list {Key : string, Display : string},
               Selected : source string}
              -> xbody

val crender' : {Choices : list string,
                Selected : source string}
               -> xbody