# -*- tcl -*-
#
# -- Null format
#
# Copyright (c) 2001-2002 Andreas Kupries <andreas_kupries@sourceforge.net>
# Copyright (c) 2003      Andreas Kupries <andreas_kupries@sourceforge.net>

# This is a null format which does return no output at all.

################################################################

proc fmt_initialize  {}     {return}
proc fmt_shutdown    {}     {return}
proc fmt_numpasses   {}     {return 1}
proc fmt_postprocess {text} {return ""}
proc fmt_plain_text  {text} {return ""}
proc fmt_setup       {n}    {return}

foreach p {
    manpage_begin moddesc titledesc manpage_end require description
    section para list_begin list_end lst_item call usage bullet enum
    arg_def cmd_def opt_def tkoption_def see_also keywords example
    example_begin example_end nl arg cmd opt emph comment image mdash
    sectref syscmd method option widget fun type package class var
    file uri term const copyright namespace subsection category ndash
} {
    proc fmt_$p {args} {return ""}
}

################################################################
