Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /smlnj-lib/branches/rt-transition/HTML/html-defaults.sml
ViewVC logotype

View of /smlnj-lib/branches/rt-transition/HTML/html-defaults.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2980 - (download) (annotate)
Sat Apr 12 15:01:15 2008 UTC (12 years, 6 months ago) by jhr
File size: 568 byte(s)
  Create branch of SML/NJ Library to work around missing APIs.
(* html-defaults.sml
 *
 * COPYRIGHT (c) 1996 AT&T Research.
 *
 * Some HTML attributes have default values specified by the DTD; this
 * file defines values for these.
 *)

structure HTMLDefaults =
  struct

    val br_clear	= HTML.TextFlowCtl.none
    val area_shape	= HTML.Shape.rect
    val form_method	= HTML.HttpMethod.get
    val form_enctype	= "application/x-www-form-urlencoded"
    val input_type	= HTML.InputType.text
    val input_align	= HTML.IAlign.top
    val th_rowspan	= 1
    val th_colspan	= 1
    val td_rowspan	= 1
    val td_colspan	= 1

  end;


root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0