comparison lib/ur/basis.urs @ 1292:a671c986f517

Support multiple CSS classes for a single tag
author Adam Chlipala <adam@chlipala.net>
date Sun, 05 Sep 2010 12:50:06 -0400
parents be6e2cd8d9a9
children acabf3935060
comparison
equal deleted inserted replaced
1291:be6e2cd8d9a9 1292:a671c986f517
561 561
562 562
563 (** XML *) 563 (** XML *)
564 564
565 type css_class 565 type css_class
566 val classes : css_class -> css_class -> css_class
567 (* The equivalent of writing one class after the other, separated by a space, in
568 * an HTML 'class' attribute *)
566 569
567 con tag :: {Type} -> {Unit} -> {Unit} -> {Type} -> {Type} -> Type 570 con tag :: {Type} -> {Unit} -> {Unit} -> {Type} -> {Type} -> Type
568 571
569 con xml :: {Unit} -> {Type} -> {Type} -> Type 572 con xml :: {Unit} -> {Type} -> {Type} -> Type
570 val cdata : ctx ::: {Unit} -> use ::: {Type} -> string -> xml ctx use [] 573 val cdata : ctx ::: {Unit} -> use ::: {Type} -> string -> xml ctx use []